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Der Epson Personal-Computer QX-16 
(Bericht Seite 78) 


Software-Tests: 


CPC-464: Forest at World’s End 
CPC-464: Ghouls 


User: 

TI-99: Super-Disassembler 
CPC-464: PAINTER 

BTX: — Aktuell — 


Tips und Tricks: 


Für CPC-464 


Utility: 

Atari: Zeicheneditor 

C-64 / VC-20: Decelerator 
CPU-Game 

MSX: Alien Attack 


28 Computersysteme im Benchmark-Test! 
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CPU Juli ’85 


Der OKI MICROLINE 192-Drucker, 
eine der zahlreichen Neuheiten, die seit 


der Hannover-Messe auf den Markt ge- Ein komfortables Zeichenprogramm Ein Weltraumspiel für MSX-Com- 
kommen sind für den CPC-464 puter-Besitzer 

CPU-Utility CPU-Markt 
CPC-464 Neues vom Computermarkt 4/78 
Erweiterung des CPC-Befehlssatzes 


um einen Box-Befehl 17 


Atari ” CPU-Game 


Zeicheneditor 


TI-99 MSX 
High-Resolution Graphik 47 Alien Attack 20 
C-64 
Del 64 48 
Deutscher Zeichensatz 50 CPU-Test 
m Y ni 66 Hardware 
Ba Wer ist der Schnellste im ganzen Land? 37 
Software 
CPU-User CPC-464: Forest at World's End 13 
. CPC-464: Ghouls 13 
ZX-Spectrum 
Quassi 9 
Dokumentation von Systemvariablen ® 14 Rubriken 
Mit Maschinensprache zum Bildschirm 44 
BTX setzt sich durch 26 CPU-Wörterbuch 8 
CPC-464 
Painter 38 Impressum 20 
Apple CPU-Happy 46 
Hello 52 Ben 
CPU-Bibliothek 75 
TI-99 BEREITEN PIE EEE 
Super-Disassembler 57 Softwareservice 64 
CPU-Basar 70 
CPU-Tips und Tricks Computer-Club-Vorstellung 73 
Für CPC-464 25/43/63 Computer-Messen '85 63 
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CPU-Markt 


Erstes vollautomatisches Selbst- 
wähl-Modem von der Deutschen 
Bundespost FTZ-zugelassen 


Unter der Nummer FTZ 
04168 D wurde erstmals von 
der Deutschen Bundespost 
ein Modem zugelassen, das 
auf der Basis einer Wählelek- 
tronik DB 1201/02 arbeitet 
und von einem Programm 
gesteuert wird. 

Damit besteht jetzt eine ko- 
stengünstige, sichere Alterna- 
tive zu den störanfälligen 
Akustikkopplern, zu teuren 
Standleistungen und z. T. 
zum Telex-/Teletextnetz. 
Das Wählmodem wurde zu- 
gelassen für alle IBM PC-Mo- 
delle, Sirius/Victor-Compu- 
ter und alle IBM-Kompati- 
blen. 

Das Modem wird asynchron 
mit 1200/75 Baud betrieben 
und mit einem von Control- 
ware entwickelten Gehäuse 
mit serieller Schnittstelle und 


Spannungsversorgung an den 
PC angeschlossen. 

Die midas-Software arbeitet 
in 2 Modi: 

manuell: 

Telefonnummern werden 
über die Tastatur eingegeben, 
der PC wählt sich zu einem 
weiteren durch. Wenn .die 
Verbindung zustandekommt, 
können Dateien gesendet 
oder von der Gegenanlage ab- 
geholt werden. 

automatisch: 

Aus dem midas-Programm 
oder einem beliebigen ande- 
ren kann eine Datei erstellt 
werden, die beliebig viele Te- 
lefonnummern, gewünschte 
Uhrzeit und zu übertragende 
Texte beinhaltet. Diese Datei 
wird vom Programm abgear- 
beitet und die Texte können 
z. B. nachts übertragen wer- 


den. 

Übertragen wird 8-bit-Code, 
also nicht nur reiner Text, wie 
im Telex-Netz, sondern auch 
Maschinenprogramme oder 
Grafikdateien. 

Die Übertragung erfolgt 
komprimiert. Für mehr als 3 
gleiche Zeichen werden nur 
das Zeichen selbst und dessen 
Anzahl übertragen. Damit 
können die Kosten wesent- 
lich reduziert werden. 


“rc 


3 | 
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Die Wählkarte DB 1201/02 
wird von der Deutschen Bun- 
despost für 18 DM/Monat 
vermietet. Software und Mo- 
dem-Box sind von midas für 
den Preis von DM 1500 + 14 
% MwSt. erhältlich. 

In Kürze wird das System 
auch im Hintergrundbetrieb 
verfügbar sein. Damit kann 
der PC senden/empfangen, 
wenn im Vordergrund z. B. 
Briefe geschrieben werden. 


Neue Computer: Ataris neue 
Superrechner 


Auf der CES in Las Vegas 
stellte Atari erstmals seine 
neue Rechnergeneration dem 
Publikum und der Fachpres- 
se vor. Auf der Hannover- 
Messe wurden die Geräte 
dem staunenden Publikum 
präsentiert: 

Das neue Flaggschiff von 
Jack Tramiel ist der Atari ST 
520. Dieser neue Computer 


ist mit einer 8 MHZ - 68000 
CPU und 512 kByte RAM 
ausgerüstet. Aufgrund des 
Graphic Enviroment Mana- 
gers GEM von Digital Rese- 
arch, einem Graphik-,Be- 
triebssystem“, bietet der ST 
520 nahezu die gleiche Benut- 
zeroberfläche wie Apples 
Macintosh. GEM unterstützt 


UmiEREEREE CS LES Ca NA LER LE Sa CS vazl VR Vmiiiil Gi 
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Icons, Windows und die Ata- 
ri-Mouse. Aufgrund dieser 
Mac-Ähnlichkeit trägt der 
neue Rechner bereits den 
Spitznamen Jackintosh. Au- 
Ber dem GEM ist in den 192 
kByte ROM das Betriebssy- 
stem TOS (Tramiel Opera- 
ting System) untergebracht, 
das eine modifizierte CP/M 
68k-Version ist. 

Wie auf der Messe zu erfah- 
ren war, wird der ST 520 ab 
Juni/Juli 85 mit Basic und 
Logo im ROM ausgeliefert, 
andere Sprachen (wie z. B. C 
und Forth) werden jedoch 
auch erhältlich sein. Das be- 
ste ist jedoch der Preis des 
Rechners. Zusammen mit ei- 
ner ebenfalls neu entwickel- 


ten 500 kByte Floppy (For- 
mat 3% Zoll), einem mono- 
chromen Monitor und der 
Maus wird das Komplettsy- 
stem nach Angaben von Ata- 
ri-Mitarbeitern etwa 2990 
DM kosten. Zum Sensations- 
preis von nur ca. 1200 DM 
soll eine 10 MB-Festplatte er- 
hältlich sein. 

Die auf der CES ebenfalls an- 
gekündigten kleineren Mo- 
delle der ST-Serie (ST 130 
und 260) werden nach Anga- 
ben von Atari-Mitarbeitern 
zumindes vorerst nicht in Eu- 
ropa angeboten. 

Zusammen mit dem ST 520 
stellte Atari auch den Nach- 
folger des 800 XL, den 130 
XE vor. Das neue Gerät hat 
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einen RAM-Speicher von 
128 kByte, eine 6502-CPU 
und soll vollkompatibel zu 
seinem Vorgänger sein. Seine 
kleineren Brüder, die 64 kBy- 
te-Modelle 65 XE, 65 XEP 
und 65 XEM wurden nicht 
mehr vorgestellt und werden 
wohl auch (zumindest vor- 
erst) nicht produziert. 


CPU-Markt 


Atari ST - ein neuer 
Leistungs-PC - 


Bisher konnte der Kunde nur 
zwischen zwei Computer- 
Klassen wählen. Preiswerte, 
dafür aber einfache Heim- 
Computer mit wenig Lei- 


stung oder leistungsfähige, 
dafür aber sehr teure Perso- 
nal-Computer. Dazwischen 
in der Klasse zwischen 3000 
und 6000 Mark gab es kein 
besonders attraktives Ange- 
bot. Atari hat jetzt für diesen 
Käuferkreis einen Personal- 
Computer der Spitzenklasse 
zu einem sehr günstigen Preis 
gebaut. Mit 520 Kilobyte-Ar- 
beitsspeicher und einem 500 


Kilobyte-Diskettenlaufwerk 
wird der Atari unter 3000 
Mark kosten. 

Die von Atari beim ST einge- 
setzte Computer-Technolo- 
gie repräsentiert die Spitze 
des heute möglichen Stan- 
dards. Dazu gehört beson- 
ders der Mikroprozessor 
MC 68000, der zu den 
schnellsten und leistungsfä- 
higsten Prozessoren über- 


haupt gehört. Auch umfang- 
reiche Aufgaben und große 
Datenmengen im professio- 
nellen Einsatz sind für den 
520 ST kein Problem. 

Mit GEM wird ein völlig neu- 
es Betriebs- und Bedienungs- 
system für Personal-Compu- 
ter angeboten. Es wurde vom 
international bekannten 
Software-Haus Digital Re- 
search entwickelt. GEM bie- 
tet dem Benutzer den großen 
Vorteil, daß er keine kompli- 
zieren Computer-Befehle 
mehr lernen muß, sondern 
im einfachen Dialog auf ver- 
ständliche Fragen des Com- 
puters antwortet. 

Dafür steht ihm neben der 
Tastatur, natürlich mit Um- 
lauten und deutschen 
Sonderzeichen, eine soge- 
nannte Maus zur Verfügung, 
die einfach über den Tisch 
geschoben wird. Will er bei- 
spielsweise schnell etwas be- 
rechnen, wird der Pfeil mit 
Hilfe der Maus auf dem Sym- 
bol „Kalkulator* bewegt. 
Nach einem Knopfdruck er- 
scheint die Zeichnung eines 
Taschenrechners auf dem 
Monitor, und wie mit dem 
Finger werden dann die zu 
berechnenden Zahlen mit der 
Maus und dem Pfeil ange- 
tippt. 

Software-Entwickler in den 
USA und der Bundesrepublik 


arbeiten an Standard- und 
Branchenprogrammen für 
den Atari ST. 

Die ST-Modelle von Atari 
sind komplett ausgestattet. 
Ohne elektronische Aufrü- 
stung oder Zusatzplatinen 
sind zwei Schnittstellen, 
RS232C und Centronics, vor- 
handen. Außerdem ein An- 
schluß für das serienmäßige 
3,5 Inch Diskettenlaufwerk 
und eine Festplatte. Atari hat 
Steuerung und Intelligenz für 
Floppy und Festplatte in die- 
se Systeme integriert, so daß 
sie ohne Aufwand steckfertig 
an den Kunden geliefert wer- 
den. Für den Bildschirm gibt 
es drei Anschlüsse, RGB für 
einen Farb-Monitor, Farbe 
ist serienmäßig, eine AV- 
Buchse für einen monochro- 
men Monitor und ein HF- 
Ausgang für den Anschluß ei- 
nes normalen Fernsehgerätes. 
Durch die Auswahl unter drei 
Bildschirmen gewinnt der 
Atari 520 ST an Flexibilität. 
Bisher war der Personal- 
Computer wegen seiner Grö- 
Be und seinem Gewicht an 
den Arbeitsplatz gebunden. 
Der kleine, leichte, handliche 
ST dagegen ist mobil einsetz- 
bar. 


Preis des Atari 520 ST inklu- 
sive eines 3,5-Zoll-Disketten- 
laufwerks: DM 2795,- 


Die neuen 128-Modelle von 
Commodore 


Der neue C 128-Personal- 
Computer deckt alle Anwen- 
dungen bisheriger Heimcom- 
puter ab, erfüllt darüber hin- 
aus noch die Forderungen an 
einen Personal-Computer. 
Das Modell folgt damit dem 
Trend bei den häuslichen An- 
wendungen. Traten bisher im 
wesentlichen Jugendliche als 
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Benutzer auf, so werden im 
zunehmendem Maße auch 
Erwachsene für Aufgaben der 
beruflichen Fortbildung, Ein- 
satz im Kleinstbetrieb oder 
Teilnahme an Service-Ein- 
richtungen der Telekommu- 
nikation (Btx, Datex-P, 
Mailbox, Datenbanken, Elec- 
tronic Mail) hinzukommen. 


Diesem Anwendungsprofil 
entsprechend ist die Struktur 
des Commodore 128 als Dual 
CPU-System mit MOS 8502 
und Z 80 aufgebaut. Die neu- 
entwickelte 8502 in Verbin- 
dung mit residentem Be- 
triebssystem und Basic-Inter- 
preter ist im Commodore 64- 
Modus zu diesem Commo- 


dore-Modell kompatibel: im 
Commodore 128-Modus ar- 
beitet sie kompatibel zu der 
am weitesten verbreiteten 8- 
bit-CPU 6502. Hierdurch 
sind praktisch sämtliche für 
Commodore-Rechner jemals 
entwickelte Programme nach 
geringen Modifikationen 
lauffähig. Hinzu kommt das 


CPU5 


CPU-Markt 


Angebot an professioneller 
CP/M 3.0 Software, die über 


Disketten geladen wird. Der | 


Arbeitsspeicher beträgt je 
nach Betriebsmodus 64 bis 


128 KBRAM. Die Kapazität | 


läßt sich bis auf 512 KB er- 
weitern. Im Textbetrieb ist 
der Bildschirm in 40 Zeichen 
x 25 Zeilen organisiert. Im 
128- und CP/M-Modus kann 
auf 80 Zeichen umgeschaltet 
werden. Gleiches gilt für die 
Grafikauflösung mit 320 bzw. 
640 x 200 Punkten. Es wer- 
den bis zu 16 Farben darge- 
stellt, im 64- und 128-Modus 
bis zu 8 Sprites. Das Schnitt- 
stellenangebot ist wie ge- 
wohnt komplett, jedoch gibt 
es zusätzlich neben dem Viı- 
deo-Ausgang einen RGBl- 
Ausgang. Das in der Modell- 


version Commodore 128 D 
eingebaute Diskettenlauf- 
werk ist kompatibel zur Flop- 
py 1541 und erreicht je nach 
Betriebsart eine Kapazität 
von maximal 410 KB. Die 
alphanumerische Tastatur 


mit separatem Rechenblock | 


und Funktionstasten hat mit 
insgesamt 92 Tasten profes- 
sionellen Zuschnitt. Der Preis 
für den C 128-Personal-Com- 
puter beträgt ca. DM 1200,-. 
Mit dem neuen Modell C 128 
deckt Commodore über das 
eigene residente Betriebssy- 
stem besonders benutzer- 
freundliche Anwendungen in 


Unterhaltung und Ausbil- | 
ermöglicht | 


dung ab und 
gleichzeitig über CP/M die 


Nutzung großer Programm- | 


Bibliotheken. 


Technische Daten des 


C-128 


CPU: MOS 8502 
(simuliert MOS 6510 und MOS 6502) 
Zilog Z 80 

Taktfrequenz: 64-Modus | MHz 


128-Modus 2 MHz 
Z80-Modus 4 MHz 


Arbeitsspeicher: 


64-Modus - 


64 KB RAM 


128-Modus - 128 KB RAM 
Z80-Modus - 128 KBRAM 
Externe RAM-Disk bis 512 KB 


Betriebssystem: 


im 128-Modus resident 


48 KB ROM (max. 96 KB ROM) 


im Z 80-Modus CP/M 3.0 über Dis- | 


kette ladbar 


Interfaces: 


Commodore seriell 


Control-Ports, 2 

User-Port 

Audio/Video 

RGBI. digital (TTL-Pegel) 
HF-Modulator 

Erweiterungs-Port für Steckmodule 


Programmiersprache: 


Massenspeicher: 


CPU 6 


im 64-Modus - BASIC 2.0 residenter 
Interpreter 

im 128-Modus -— BASIC 7.0 residen- 
ter Interpreter und Maschinenspra- 
che-Monitor 

im Z 80-Modus — weitere Sprachen 
ladbar 


I 


4 Hr 


vepen8 


RRHERE HEFTE N 


Tastatur: 


Farbe: 


Sound: 
Monitor: 


Typ Commodore 1541, beim Modell | 


Commodore 128 D integriertes 5 \- 
Zoll-Floppy-Laufwerk. sonst separat 
im 64/128-Modus kompatibel zum 
Floppy-Laufwerk 1541 


| 
Zeichen/Zeile: 


im-64 Modus - Double Sıde max. 350 

KB. Übertragungsrate 300 Zeichen 

sec 

im 128-Modus — Double Side max. 

350 KB. Übertragungsrate 1500 Zei- 

chen’/sec 

im Z 80-Modus - Double Side/Dou- 

ble Density max. 410 KB, Übertra- 

gungsrate 3500 Zeichen/sec 

professionelle Schreibmaschinenta- 

statur mit 92 Tasten, separater Re- 

chenblock mit 14 Tasten, 8 Funk- 

tionstasten, 6 Cursortasten, | Help- 

Taste und | Umschalttaste von 40 auf 

80 Zeichen 

Textbetrieb 

- im 64-Modus 40 Zeichen x 25 Zei- 
len 

- im 128-Modus umschaltbar 40/80 
Zeichen x 25 Zeilen 

- im Z 80-Modus 640 x 200 Punkte 

Graphik 

- im 64-Modus 320 x 200 Punkte 

- im 128-Modus umschaltbar 
320/640 x 200 Punkte 

- Z 80-Modus 640 x 200 Punkte 

16 Farben 

im 64/128-Modus zusätzlich bis zu 8 

Sprites 

6581 SID-Chip 

40 Zeichen 

- im 64/128-Modus über VIC Chip 
NTSC/PAL Color TV oder Moni- 
tor 1701/1702 

80 Zeichen 

- im 128-Modus und Z 80-Modus 
über Video Interface Chip 7563 
RGBI Monitor plus monchro- 
men Monitor 
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Schon gehört?! -— ++- Schon gehört?! -—— ++- Schon gehört?!--++- 


Der TRONIC-VERLAG sucht in den Computerzeitschriften „COMPUTRONIC* und „HOMECOMPUTER“ den 


Software-Champion 1985!!! 


Es warten tolle Preise auf Sie! 


1. PREIS: 


5000 DM in bar! 


Ein Farbmonitor 
im Wert von 800,—- DM! 


3. PREIS: 


Computer-Zubehör (wahlweise 


im Gesamtwert von 300,- DM) 


Nutzen Sie Ihre Chance, beteiligen Sie 
sich mit einem Software-Programm an 
unserem Wettbewerb! 


Jedes eingesandte Programm nımmtan 
der Auswahl teil!!! 


Letzter Annahmetermin ist der 30. Sep- Einzusenden sind: 

tember 1985. Der Rechtsweg ist ausge- u Spielbeschreibung 

schlossen. ER 

| + Datenträger 

a ee Ausgabe von COM- + Listing (nicht unbedingt erforderlich) 
PUTRONIC mindeste dreı TOP- > , 

PROGRAMME. in „HOMECOMPU- Einsenden an: TRONIC-VERLAG - 
TER* 1 Topprogramm vor. Hierfür Postfach Bu 3444 Wehretal | 


triffi die Redaktion die Entscheidung 


(unabhängig vom Computertyp). KENNWORT: SU PER-SOFTWARE- 


Wird ein Programm zur Darstellung ım 

Heft herangezogen. zahlt der Verlag eın 

Honorar von DM 120.- pro abgedruck- CHAM PION 
te volle Seite. Zum Jahresende stellt die 

Redaktion noch einmal alle als TOP- 

PROGRAMME ausgezeichneten Pro- 

gramme vor. Unsere Leser und die Re- 

daktion werden dann in der Ausgabe R . i 

Nov./Dez. '85 das absolute TOPPRO- Wir wünschen allen Freizeitautoren 
GRAMM des JAHRES wählen. . . . 

Der Autor des Programmes wird ın un- v iel Spaß beim Mitmachen. 

serer Ausgabe vorgestellt und mit DM 

5000,- prämiiert werden. 
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l 
Formatierer . | 
Ein Systemprogramm, meist] 
ein Unterprogramm eines 
Diskettenbetriebs-Systems, 
(z. B. CP/M), das die einzel- 
nen Sektoren/Tracks einer 
Diskette kennzeichnet. 


! lem 


Eine höhere Programmier-" 
sprache, die sehr stark an As- 
sembler angelehnt ist. Es ist 
eine sehr schnelle Sprache, ! 
die auch für Heimcomputer! 
geeignet ist. Sie wurde Mitte! 
der siebziger Jahre von der! 
amerikanischen Firma Forth ı 
entwickelt und war in erster 
Linie für Steuerungsaufgaben | 
gedacht. Der Anwender kann 
in Forth eigene Befehle defi- 
nieren. Forth läßt sich somit 
für fast alle Aufgaben einset- 


Funktionstaste 
Tasten eines Computers, de-! 
nen kein Zeichen, sondern! 
eine Funktion zugeordnet ist; | 
dazu zählen die Cursor-Ta- 
sten, Break-Taste und andere; 
Spezialfunktionen des Com- 
puters. Viele Computer besit- 
zen die Möglichkeit, be- 
stimmte Tasten mit einer 
Funktion zu belegen. 


Friktionsantrieb 
Der Friktionsantrieb erlaubti 
bei Druckern die Verwen-| 
dung von Endlos- oder auch] 
Einzelblattpapier ohne den, 
„Lochrand“, der für die 
Traktorführung erforderlich, 
ist. 
I 
| 


Fortsetzung des CPU-Wörterbuches 


Eine höhere Programmier- 
sprache, die im Jahre 1954 
entwickelt wurde. Ähnlich 
wie Algol ist auch Fortran 
eine problemorientierte Pro- 
grammiersprache, die vor al- 
im technisch-wissen- 
schaftlichen Bereich einge- 
setzt wird. Die Symbolik von 
Fortran lehnt sich stark an 
die mathematische Formel- 
sprache an und ist daher di- 
rekt auf die Bedürfnisse von 
Ingenieuren, Technikern und 
Wissenschaftlern zugeschnit- 


Ganzzahl (integer Zahl) 

Eine Zahl, die keine Nach- 
kommastellen besitzt. Viele 
Heimcomputer können spe- 
zielle Integer-Variablen ver- 
arbeiten, diese benötigen we- 
sentlich weniger Speicher- 


platz als die Realen-Varia- 


ı Gleitkomma-Arithmetik 
ı Häufig auch mit Fließpunkt-, 


oder Floating-Point-Arith- 
metik bezeichneter 8 Rechen- 
algorithmus. 


Ebenfalls ein Befehl der Pro- 
grammiersprache Basic, wel- 
cher zu der angegebenen Zei- 
lennummer verzweigt. 


Befehl der Programmierspra- 
che Basic. Durch die Angabe 
einer Zeilennummer wird ein 
Unterprogramm aufgerufen. 
Dieses wird durch den RE- 
TURN-Befehl wieder verlas- 
sen. eh, 


Halbduplex 

Mit Halbduplex bezeichnet 
man ein Datenübertragungs- 
verfahren, bei dem zwar die 
Übertragung in beide Rich- 
tungen möglich ist, jedoch 
zum selben Zeitpunkt Daten 
nur in eine Richtung übertra- 
gen werden können. Um eine 
Antwort zu senden, müssen 
Sender und Empfänger umge- 
schaltet werden. Halbduplex 
wird heute kaum noch ver- 
wendet und wurde durch das 
Vollduplex-Verfahren er- 


Haltepunkt (breakpoint) 

In einem Programm gekenn- 
zeichnete Stelle, an der dieses 
angehalten wird und dem Be- 
nutzer die Möglichkeit zum 
Testen bietet. Diese Methode 
wird vorwiegend in der 
Assembler-Programmierung 


angewandt. 


Handler (hantierer) 

Teil eines Programms, um 
Peripheriegeräte zu kontrol- 
lieren. 


I 

| Hamming-Code 

‚Ein spezieller Code, der als 
Fehlerkorrektur-Einrichtung 
‚Yerwendet wird. Es ist ein 7- 
Bit-Code, dessen Aufbau die 
Iidentifizierung fehlerhaft 
lübertragener Daten ermög- 


ıEin genauer Ausdruck einer 
ı Bildschirmseite. Oft ist der 
ı Hardcopy-Befehl im ROM 
‚des jeweiligen Computers 
‚enthalten. 


Alle Geräte und mechani- 
schen Komponenten eines 
| Computersystems einschließ- 
I lich der Peripheriegeräte. 


| HEX 
‚Abkürzung für Hexadezimal- 


| Hinterbandkontrolle 

Bei der Hinterbandkontrolle 
Iwerden die gerade aufge- 
Izeichneten Daten mit einem 
ILesekopf, der gleich hinter 
Idem Schreibkopf sitzt, ge- 
Iprüft und mit den ursprüngli- 
ıchen Sollwerten verglichen. 
ı Tritt bei der Prüfung ein Feh- 
‚ler auf, so werden die Daten 
jneu auf das Band geschrie- 
ben. Diese komfortable Ein- 
richtung ist bis jetzt bei 
Heimcomputern noch nicht 
| vorhanden. 


„Quassi“: Ein Programm für den 
/X-Spectrum 48K 


Quassi ist ein Programm, das 

die Erstellung und Verbesse- 

rung von Maschinenpro- Zu den Kommandos: 

grammen wesentlich komfor- 

tabler gestaltet. Es gestattet “p“ druckt das gesamte, bisher erstellte Programm aus, 

die Eingabe des Codes im “]* lädt das Programm ab Startadresse in den Speicher, 

Hex-Format, setzt selbstän- “g“ startet das gespeicherte Programm ab Startadresse, 

dig die entsprechenden Spei- “s“ speichert das Programm auf Kassette, 

cherzellen, wıe man es von £X:a,b löscht von Adresse a an b Zeilen. Dabei werden 

einem Assembler gewohnt jeweils ganze Zeilen und nicht nur Speicherzellen 

ist, auf den Bildschirm und gelöscht. 

erleichtert das Verbessern 

oder Löschen einzelner oder Aus 65200 cd If 09 ## 

mehrerer Speicherzellen. 65203 fl ## 

Nach dem Start erscheinen 65204 06 00 ## 

zunächst die verschiedenen 65206 de ff ## 

möglichen Kommandos. Da- 

nach gibt man die Anzahl der wird mit “x65203,2“: 65200 cd IF 09## 

Bytes ein, die man sich reser- 65203 de ff ## 

vieren lassen will, und an- 

schließend die Adresse, ab “va, b$“ Verbessert Adresse a mit b$: 

der man das Programm er- 65200 cd 00 91 ## — “v65201,10*“ — 65200 cd 10 91 ## 
stellen und starten lassen will. 

Es erscheint darauf die erste “ıa,b$“ Schiebt ab a noch b$ ein: 

Adresse mit einem Cursor 

davor. Man kann jetzt den 65200 de 00 ## 65200 de 00 ## 
gewünschten Hex-Code oder “165202,0b6e“ — 65202 Ob 6e ## 
das Kommando eingeben. Ist 65202 cd 3e 09 ## 65204 cd 3e 09 ## 
es ein Hex-Code, so wird die- 

ser der aktuellen Adresse “T.a, b“ Berechnet einen relativen Sprung von a nach b. 

zugeordnet. Dabei ist es vor- Dabei ist a die Adresse, in der der relative Sprung- 

gesehen und auch sinnvoll, befehl steht. Für die Sprungweite setzt man am 

jeweils eine geschlossene Be- besten vorläufig einen beliebigen Wert ein und 

fehlsgruppe in einer Zelle un- läßt am Schluß den richtigen Wert ausrechnen 
terzubringen. Dies erhöht die und einsetzen: 

Übersichtlichkeit beträcht- 

lich. Nach Übergabe des 65200 af ## 65200 4f ## 
Hex-Codes mit ENTER er- 65201 18 ff ## —"r65201,65200*— 65201 18 fd ## 
scheint dieser nun neben sei- 65203 00 ## 65203 00 ## 
ner Adresse, es wird die näch- 

ste freie Adresse mit Cursor xx“ löscht das ganze Programm, setzt die Adresse 


angezeigt und man kann ei- 
nen weiteren Code oder ein 
Kommando eingeben. 


wieder auf die Startadresse und geht zum Anfang. 


Wenn man die Kommandos eingibt, so muß man darauf | kann man es mit “g“ laufen lassen. Der Variablen “Ergebnis“ 


achten, daß nach dem I. Kommandobuchstaben direkt die 


| wird dabei der Inhalt des BC-Registerpaares zugeordnet. 


anzusprechende Speicherzelle steht (natürlich außer p, 1, g, s, | 
xx) und daß die zweite Adresse bzw. der HexCode (bei v und i) 
vom ersten Teil durch Kommas getrennt werden. Beispiele für | 
die Kommandos: 


v65200,ff 165190,0b0a x64500,1 


Nachdem man das Maschinenprogramm erstellt hat, lädt man | 
es mit “I* und speichert es mit “s“ am besten gleich ab. Danach 
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Der Speicherbereich von 64900 an aufwärts ist mit Absicht 
freigelassen, um 


a) die UDGs nicht zu stören 
und b) evt. dort noch ein MC-Programm unterzubringen, 
das eine Einzelschrittbearbeitung erlaubt. Dazu 


müßte man jedes “##“ durch ein ’CALL-Subrouti- 
ne’ ersetzen, daß dieses Programm aufruft. 
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Wichtige Programmteile: 


Zeile 40- 290 Eingabe des Hex-Codes 


8000-8025 Unterprogramm “Eingabestring 


Verarbeitung des Hex-Codes mit Ver- aufspalten“ 
zweigung zu den Unterprogrammen 9000 Unterprogramm “Unterprogramme 
300- 305 Cursor setzen aufrufen“ ° 


310- 315 Cursor löschen 

400- 430 ° Unterprogramm “Laden“ 

500- 510 Unterprogramm “Starten“ 

600- 650 Unterprogramm “Verbessern“ 

700- 765 Unterprogramm “Löschen“ 

800- 840 Unterprogramm “Einfügen“ 

900- 935 Unterprogramm “Relativer Sprung“ 
1100-1130  Unterprogramm “Programm listen“ 
1200-1210 Unterprogramm “Abspeichern“ 
5025 -. Unterprogramm “Bildschirmkopf“ 
5100-5120 _Unterprogramm “neue Bildschirmseite“ 
5300-5320 Unterprogramm “alte Bildschirmseite 

löschen“ : 


string geht dabei nicht verloren. 


paar Bytes Länge gibt es genügend. 


2 PRINT AT 2,05 "Kommandos: ";AT 4,4;5"x(a),(b) Loesche von Adresse 


a aus b Zeilen";AT 6,45 "xx Loesche ganzes Prg.";AT 7, 
Lade Frogramm ";AT 8,4;"g Starte Programm ab 
Startadresse" 
3 PRINT AT 10,45 "i(a),b$ Schiebe ab Adresse abte 
T 12,45"r(a),(b) Berechne relati- Sprung von a nach 
14,4;"p Drucke ganzes Programm au 
4 PRINT AT 16,45"v(a),b#$ Verbessere Adresse a mit 
T 18,4; "s Abspeichern";AT 21,0; "Bitte eine Taste druecken": 
(6) ; i 


S CLS : PRINT AT 0,0;5"Ram frei bis 54900" 

10 INPUT "Wieviel Bytes fuer das Frogramm reservieren? "jram 
15 LET ramt=54900-ram: CLEAR ramt-i 

17 LET ramt=FEEK 23730+256*PEEK 253731 

19 PRINT AT 0,0; "Ramtop: "sramt; 


0 TO 20 
2ı GO SUB 5025 
22 LET zz=0: LET prog=0: LET z=0: LET pos=0: LET h$="": DIM v(18) 
25 PRINT AT 3,2; "Adr Hex-Inhalt" 
30 60 SUB 300 
31 LET adr=start 
32 LET v(1)=500: LET v(6)=400 
33 LET v(16)=600: LET v(3)=800 
34 LET v(10)=1100: LET v(12)=900 
35 LET v(13)=1200: LET v(14)=1500 
36 LET v(18)=700 j 
40 PRINT AT pos+5,1;adr 
42 INPUT "Hex-Eingabe: ";i$ 
47 IF CODE i$(1)<48 OR CODE i$#(1)>122 THEN GO TO 40 
50 LET 1=0: LET b=LEN i$# 
35 LET 1=1*+1 
57 IF 1>b THEN GO TO 70 
60 IF i$(1)<>" " THEN 60 TO 55 
65 LET i$=ist TO 1-1)+i$(l+1 TO ): GO TO a7 
70 IF CODE i$(1)>102 THEN GO TO 9000 
72 IF b/2<>INT (b/2) THEN GO TO 40 
75 LET i$eis+t'##" 
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20 INPUT "Startadresse? ";jstart: IF start<=ramt OR start>64900 THEN G 


Sollte das Programm wegen einer fehlerhaften Eingabe ausstei- 
gen (ein Komma vergessen o. ä.), so setzt man es am besten 
mit GOTO 40 wieder fort. Der bis dahin erstellte Programm- 


Gegen Absturz bei einem Programmfehler im erstellten Ma- 
schinenprogramm ist natürlich auch Quassi (Quasi-Assem- 
bler) nicht gefeiht. Deshalb noch mal der Tip: Erst abspei- 
chern, dann starten. Aber hier könnte man ja im reservierten 
Speicher. oberhalb 64900 noch eine Absturzroutine unterbrin- 
gen, die das Schlimmste verhindert. Solche Routinen mit ein 


4,"1 


in";A 
b";AT 
g" 

b#£"; A 
PAUSE 
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80 LET h$=h$( TO 2*z)+i$+h$s(2%#z+1 TO ) 

90 GO SUB 310 

95 LET x$="" 

100 FOR g=1 TO LEN i$/2 

105 LET x$=x$+i$(2*g-1 TO 2%g)+" " 

110 LET z=z+1: NEXT g 

195 PRINT AT pos+5,7;x$ 

200 LET pos=posti1 

210 LET adr=adr+g-2 

250 IF adr<64900 THEN GO TO 290 

255 PRINT : PRINT " Adresse zu gross, bitte neue Startadresse einge 
ben.Nach Laden des Programms mit CLEAR neuen Ramtop setzen!" 
260 INPUT "Neue Startadresse: ";start 

265 LET adr=start: GO SUB 5025: GO SUB 1100 

290 GO SUB 300: GO TO 40 

300 IF pos?>=16& THEN LET zz=0: GO SUB 5100 

505 PRINT AT pos+5,0; INK 2; FLASH 15">": RETURN 

s10 FRINT AT pos+5,0;" "“ 

515 RETURN 

400 LET h$=h$+"c9##": LET z=z+2 

405 LET sp=start-1: LET m=-1 

410 LET sp=sp+1 

415 LET m=m+2: IF m>LEN h$ THEN LET prog=1: RETURN 

420 IF h$(m)="#" THEN GO TO 415 

425 POKE sp,16*(CODE h$ (m) -48-39%# (h$ (m) >"9"))+CODE h$(m+1) -48-39%# (h$ (m+ 
1)2"79%) 

430 GO TO 410 

500 IF prog=O0 THEN FRINT AT 21,9;5"Kein Programm!": PAUSE 50: RETURN 


505 CLS : LET ergebnis=USR start 

510 GO SUB 5025: RETURN 

&00 IF LEN i$<2 THEN RETURN 

605 GO SUB 8000 

620 IF ad<O OR ad+start>=adr THEN RETURN 

625 LET i=1: LET a=-ı 

630 IF hs(2#i)<>"#" THEN LET a=a+i 

655 IF a=sad THEN LET h$=h$( TO 2#i-2)+i$( TO 2)+h$(28i+1 TO ): GO TO & 
45 

640 LET i=i+1: GO TO 430 

645 LET zz=1: GO SUB 1100 

650 RETURN 

700 IF LEN i$<2 THEN RETURN d 

705 IF i$(2)="x" THEN GO SUB 5305: LET adr=start: GO TO 22 
710 GO SUB 8000: IF ad{O OR ad+start}=adr THEN RETURN 

715 LET gg=1: LET du=VAL i$(1i) 

717 LET i=1: LET a=-1 

720 IF h$(2#i)<>"#" THEN LET a=sa+i 

725 IF a=sad THEN LET cc=i: GO TO 740 

730 LET i=i+1: GO TO 720 

740 LET i=i+i 

745 IF hs(2#i)="#" THEN LET h$=h$( TO 2%cc-2) +h$(2#i+l TO ): 60 TO 755 


750 GO TO 740 

755 LET z=2-i+cc-1 
760 IF gg<idu THEN LET gg=gg+i: GO TO 717 
765 IF h$(LEN h$)<>"#" THEN LET h$=ehsHr"g4" 
770 LET zz=1: GO SUB 1100: RETURN 
| 800 IF LEN i$<2 THEN RETURN 
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805 GO SUB 8000 

807 IF ad<O OR ad+start>=adr THEN RETURN 

810 LET i=1: LET a=-1 

815 IF hs(2#i)<>"#" THEN LET a=atl 

820 IF a=ad THEN GO TO 840 

825 LET i=i+1: GO TO 815 

840 LET h$=h$( TO 2#i-2)+i$+"##"+n$(2#i-1 TO )s LET Z=Zz+LEN i$/2+1: LET 
zz=1: GO SUB 1100: RETURN 

900 IF LEN i$<2 THEN RETURN 

905 GO SUB 8000 

910 LET ad=ad+startı:ı LET add=VAL i$:ı LET a=add-ad-2 
912 IF ad>adr OR add>adr THEN RETURN 

915 IF a<-128 OR a>127 THEN RETURN 

920 IF a<O THEN LET a=a+t256 

925 LET x=INT (a/l1ö): LET y=a-16*x 

930 LET ad=ad+1: LET i$="v"+STR$ ad+" „"+CHR$ (x+48+39%# (x>9) ) +CHR$ (y+48 
+39#(y>9) 

935 60 SUB 9000: RETURN 

1100 IF zz=1 THEN GO SUB 5305: GO TO 1105 

1102 GO SUB 5300 

1105 LET kl=0: LET adr=start: LET pos=O 

1110 LET a=0 

1112 LET b=a:s IF a>=LEN h$/2 THEN GO SUB 300: RETURN 
1113 LET asa+ri: IF h$(2#a)="#" THEN GO TO 1117 

1114 IF pos>=16 THEN GO SUB 5300 

1115 LET kl=kl+1: GO TO 1115 

1117 PRINT AT pos+5,1;5adr;" "3: LET x$=h$(2*b+1 TO 2#a) 
1120 FOR q=1 TO LEN x#/2: PRINT x$(2*q-1 TO 2#*g)+" "ji NEXT q 
1125 LET adr=adr+kl: LET pos=posti: LET kl=0 

1130 GO TO 1112 

1200 INPUT "Name? "z;v$: IF LEN v$>10 THEN GO TO 1200 


1205 INPUT "Speichern von-bis? "saa,bb: IF bb<=aa THEN GO 
TO 1205 

1210 SAVE v$CODE aa,bb-aati 

S025 PRINT AT 1,05 "Programmbereich: "sRamt+1;"-"564900;5 AT 2,0; "Startad 
resse: "sstart: RETURN 


5100 60 SUB S305 

S110 PRINT AT pos+5,1;Adr-g+2;" ";x#: LET pos=pos#+i 

5120 RETURN 

5300 PRINT AT 21,9; "Taste druecken": PAUSE 16) 

5305 PRINT AT 21,935" » 

SZz10 FOR 1=5 TO 21: PRINT AT 1,05" "+ NEXT 
1 

5315 LET pos=O 

5320 RETURN 

8000 LET x$=i$(2 TO ): LET sr=1 

8010 LET sr=sr+1: IF x$(sr)=",„" THEN 60 TO 8020 

8015 IF sr>LEN x$ THEN RETURN 

8017 GO TO 8010 

8020 LET i$=x$(sr+1 TO ): LET ad=VAL x#t TO sr-1)-start 

8025 RETURN 

9000 GO SUB v(CODE i$(1)-102) 

9010 GO TO 40 

9999 SAVE "Quassi" LINE 1: GO TO 79799 
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CPU-Test 


SOFTWARE-TEST 


CPC 464: 


1. FOREST AT WORLD’ END 


Der CPC-464 ist wie geschaf- 
fen für gute Graphik-Adven- 


ture, er hat einen großen Um- | 
fang an Memory-Platz und | 
gute Graphik-Eigenschaften. | 


Die Graphik alleın macht 
aber noch keın gutes Spiel, 
richtige Adventure-Spieler 
benötigen einen ausführli- 
chen Text, der ihre Phantasie 
anregt. 


In FOREST AT WORLD's | 
END hat man alles, dıe Gra- | 


phik sorgt für die richtige At- 
mosphäre, der Text für die 
Spannung. Und man wird 
schon beim Einladen auf die 


Folter gespannt, wie lange es | 


CPC 464: 


denn wohl dauert. Gute Gra- | 


phik benötigt einen umfang- | 


reichen Speicherplatz. 


Nicht alle Orte ım Adventure | 


haben eın Bild, aber dort, wo 
es erscheint, ıst es großartig. 


Die Bilder wurden von Terry | 
Greer entworfen, ein Meister | WORLD’s END hat noch 
ın der Computer-Graphik. | 


Man darf sich diesen Namen 


venture nehmen auch lange | 
Sätze an. Die Routine, mit 
der das geschieht, wird PAR- 
SER genannt. Wie gut der 
PARSER ist, 


bestimmt die | 


Spielqualität und den Spiel- | 


FOREST 


witz. 


keinen ausgereiften PARSER 


und ist daher ın seinem Wort- | 


merken, er hat wirklich alle | schatz beschränkt. Das führt 


Möglichkeiten des CPC 464 
ausgenutzt. 
den vom Computer gespei- 


Die Bilder wer- | 


chert und bei Bedarf schnell | 


auf den Bildschirm gezeich- 
net. 
Die meisten modernen Ad- 


2. GHOULS 


Dieses Spiel befaßt sıch, wıe 
der Name sagt, mit Geistern, 
Gespenstern und Dämonen. 
Im Stil ist es vergleichbar mit 
dem bekannten MANIC MI- 
NER und mit ROLAND IN 
TIME. Und da es eine gute 
Graphik hat, ist es sehr ver- 
gnüglich zu spielen und dabei 
mit ausreichenden Schwierig- 
keitsgraden versehen. 


Als PAC-MAN-Spieler müs- 


sen Sıe vıel laufen und auf 


hohe Plattformen springen 
oder auf niedrigere zurückfal- 
len. Damit sınd noch nıcht 
alle Schwierigkeiten genannt. 
Denn böse Geister wollen 
verhindern, daß Sıe das Haus 
erreichen. Sıe starten irgend- 
wann über Ihnen und versu- 
chen, sich unbemerkt anzu- 
schließen. Verhindern Sie 
das, sonst ıst Ihr Leben ver- 
wirkt. 


Immerhin beginnen Sie mit 
fünf Leben! 
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In halber Höhe des Bild- 
schirms ist ein goldener Ring. 
Wenn Sie diesen erreichen, 
bevor der Geist Sie erreicht, 
werden alle Geister auf dem 
Bildschirm zerstört und man 
kann seine Aufgabe fortset- 
zen. Denn die Zeit ıst auch 
limitiert und wenn Sıe abge- 
laufen ıst, haucht Ihre Spielfi- 
gur - ihr Leben aus. 


Sollte es Ihnen nach einiger 
Übung gelingen, alle Gefah- 
ren zu meistern und das Spie- 
lende gesund und munter - 
bıs auf den überstandenen 
Spielstreß — zu erreichen, so 
können Sıe sıch ın eine HI- 
SCORE-Tabelle eintragen 
und damıt möglicherweise 
dıe Familıenehre retten. 
Dies ıst ein sehr gutes Spiel 
und es kann Sıe für Stunden 
gefangen halten. Für DM 
24,95 ın guten Fachgeschäf- 
ten erhältlich. Hersteller: MI- 
CROPOWER. 


manchmal zu langer Suche 
nach dem passenden Wort, 
was bei vielen Adventure- 
Spielern zum Reiz des Spiels 
gehört. 

Das Kommando 
the boat“ ist 


„to get into 


„clımb 


into | 


AT | 


boat“. „Enter boat“, „go 
boat“, „Jump into boat“ usw. 
werden nicht angenommen. 
Hier verbraucht man viel 
Zeit, um herauszufinden, 
welche Kommandos das Pro- 
gramm annimmt. Ein großer 
Wortschatz benötigt einen 
großen Platz an MEMORY 
und um bei der Wahrheit zu 
bleiben, FOREST AT 
WORLD’ END hat eine 
Vielzahl gespeichert. 


In Fachgeschäften oder im 
Versandhandel für 24,95 DM 


| erhältlich. 


SCSE vertreibt 


Panasonic-Lauf- 
werkspalette 


Die 3,5 Zoll- und 5% Zoll- | 


Laufwerks-Familie von Pa- 


nasonic wird von der SCSE | 


GmbH in Aschaffenburg ver- 
trieben. 


Die 3,5 Zoll-Laufwerke sınd 


in drei Ausführungen mit 250 | 
kB, 500 kB und einem Mega- 


byte lieferbar. 

Bei den 5 % Zoll-Laufwerken 
stehen zwei Versionen zur 
Verfügung: Ein Laufwerk ist 
mit 500 kB bei 48 tpi liefer- 
bar, das andere Laufwerk ist 
wahlweise für 1.0 oder 1,6 
Megabyte lieferbar. 
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Dokumentation von 
Systemvariablen 


Für den ZX Spectrum 


Die System variablen sind dıe 
wichtigsten Speicherzellen ım 
ZX Spectrum überhaupt. Sıe 
enthalten die Informationen, 
die das System zum Verwal- 
ten aller Funktionen, Spei- 
cherteile und anderer Anwen- 
dungsmöglichkeiten braucht. 
Wenn der Programmierer sıe 
vollständig beherrscht und 
die Möglichkeiten kennt. 
kann er seine BASIC-Pro- 
gramme um einiges verbes- 


sern und vervollkommnen. | 
Aber sie können nicht nur | 
| hält feste Werte, die nicht ge- | 


dem BASIC-Programmierer, 
sondern gerade auch dem 
Maschinensprache-Program- 
mierer nützen, da dieser ım- 
mer wieder die ROM-Routi- 
nen verwendet und die Sy- 
stemvariablen sozusagen die 
Brücke dahin sınd. 


Zunächst einige Grundkennt- 
nisse, die nötig sınd, um zu 


| verstehen, was die „System- 


variablen“ eigentlich sınd 
und wie man damit arbeitet: 


| Der Speicher des ZX Spec- 


trum besteht aus 65536 Spei- 
cherzellen, die von 0 bıs 
65535 durchnumeriert sind. 
Diese Nummern nennt man 
Adressen. Jede Adresse kann 


| ein Byte, d.h. eine ganze Zahl 


von 0 bis 255 speichern. Man 
unterscheidet ım allgemeinen 
zweı Speichertypen: 

Das ROM (read-ontly-memo- 
ry = Nur-Lese-Speicher) ent- 


ändert werden können. Also 
können aus dem ROM nur 
Werte gelesen werden. Beim 
ZX Spectrum reicht 
ROM von der Adresse 0 bıs 
16383. In diesem Speicher 
befindet sich ein Programm, 


\ das die BASIC-Befehle in die 


sogenannte Maschinenspra- 
che umwandelt, die der Com- 


das | 


puter versteht. Dieses Pro- 
gramm nennt man „Interpre- 
ter“. 

Das RAM (random access 
memory = Frei-Benutzbarer- 
Speicher) wird beim ZX 
Spectrum zu vielen verschie- 
denen Dingen verwendet, be- 
ginnt bei der Adresse 16384 
und endet bei der Adresse 
65535. (Beim 16K Spectrum 
endet er bei 32767.) Aus dıe- 
sen Speicherzellen können 


ebenfalls Bytes gelesen wer- | 


den, aber es können auch 
neue Zahlen abgespeichert 
werden. 

Im BASIC gibt es zweı Befeh- 
le. die mit Speicherzellen ar- 


beiten: POKE Adresse, Byte | 


| schreibt einen Wert in die mit 


| der 


Adresse angegebenen 
Speicherstelle. PRINT PEEK 


Adresse ergibt den Inhalt der | 


adressierten Speicherzelle. 
Oft müssen größere Werte als 


255 abgespeichert werden, 
deswegen werden dann die 
Werte in zwei Bytes aufge- 
teilt, die dann in zwei Adres- 


| sen gespeichert werden. Dies 


ı nen 


geschieht mit den Befehlen 
POKE a.w-256#INT 
(w/256: POKE a+l.INT 
(w/256). Die Werte (w) kön- 
mit PRINT PEEK 
a+256#PEEK(a+l) wieder 


| ausgelesen werden. Auf diese 


Weise kann man Zahlen von 
0 bis 65535 abspeichern. 

Als „Systemvariablen“ be- 
zeichnet man den Speicher- 


| bereich, den der Interpreter 


beim Arbeiten mit Adressen 
und Zahlen benutzt. Die Sy- 
stemvariablen stehen ım 
RAM von Adresse 23552 bis 
23733, können also vom Pro- 
grammierer verändert wer- 
den. Dadurch ergeben sich 
vielfältige und verschiedenste 
Möglichkeiten, seine BASIC- 
Programme zu erweitern und 
ihnen den „letzten Schliff” zu 


| geben. Die Systemvariablen 


enthalten die Informationen, 
die der Computer zum Ver- 
walten aller seiner Funktio- 
nen, Speicherteile und ande- 
rer Anwendungsmöglichkei- 
ten braucht. Im folgenden 
also eine vollständige und 
ausführliche Liste der Sy- 
stemvariablen. 
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Adressen 


23552-23559: 


23560: 
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Die „Systemvariablen“ 


Bedeutung 


Speicherplätze, die der Interpreter beim Lesen 
der Tastatur benutzt. Sie sind in zwei Blöcke 
aufgeteilt, da manchmal zweı Tasten zugleich 
gedeutet werden müssen, wenn zum Beispiel 
Großbuchstaben eingegeben werden. Das erste 
Byte gibt an, obeine Taste gedrückt wurde. Das 
zweite Byte ist ein Wiederholungszähler. Das 
dritte Byte gibt die Wartezeit vor Beginn der 
Wiederholung an. Das vierte Byte ist der Kode 
der gedrückten Taste. Die nächsten vier Bytes 


haben entsprechende Aufgaben für eine zweite | 
Taste. Die folgende Systemvariable ist aller- | 


dings besser zu verwenden. 
Hier wird der Kode der zuletzt gedrückten 


Taste bzw. Tastenkombination gespeichert. So | - 


kann man also feststellen, ob während einer 


langen Rechenroutine eine Taste gedrückt wur- | 
de. obwohl bei der Abfrage keine Eingabe er- | 


folgt. Dazu muß man in diese Adresse vorher 0 
poken. 
Übrigens kann man sich durch folgendes Pro- 
gramm eine komplizierte Repeat-Routine er- 
sparen: 


10 POKE 23560,0 

20 IF PEEK 23560 THEN PRINT CHR$ 
PEEK 23560: GO TO 10 

30 GO TO 20 
Diese Routine hat ım Gegensatz zu 

10 PRINT INKEYS$: 

20 GO TO 10 


den Vorteil, daß zuerst eine Weile gewartet 
wird und dann die Taste nicht zu schnell wie- 
derholt wird. (Dies ist übrigens auch in Maschi- 
nensprache möglich.) Mit den beiden nächsten 
Systemvariablen können diese Wartezeiten 
verändert werden. 

Hier steht die Zeit, wie lang eine Taste gedrückt 
werden muß, damit sie wiederholt wird, diese 
beträgt normalerweise 35. (Angabe in SOstel 
Sekunden.) Die Zahl 0 entspricht hier ’* 
Sekunden. 

Hier steht die Zeit, die zwischen den Wieder- 
holungen der Taste gewartet wird, diese beträgt 
normalerweise 5. (Angabe in 50stel Sekunden.) 
Die Zahl O entspricht auch hier °*-,, Sekunden. 
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23563/23564: 


23565-23567: 
23568-236035: 


23606/23607: 


23608: 


23609: 
23610: 


23611-23616: 


23617: 


23618-23620: 
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Adresse bei der Bearbeitung von selbstdefinier- 
ten Funktionen. 


Speichert unwichtige Farbinformationen. 


Hier werden Informationen von OPEN # und 
CLOSE # gespeichert. Diese Befehle sind übri- 
gens im Gegensatz zum Handbuch auch ohne 
Microdrive zu benutzen. Normalerweise geht 
jede PRINT- oder LIST-Anweisung auf den 
Bildschirm. Gibt man allerdings Print #0 oder 
#1 ein, wird der Text auf die 23ste Zeile ge- 
druckt, wo normalerweise die Eingabe erfolgt. 
(Darüber mehr bei Adresse 23659.) PRINT #2 
ist dasselbe wie PRINT und PRINT #3 dassel- 
be wie LPRINT. Durch OPEN # kann man die 
Funktionen von #0 bis #15 ändern. Hat man 
zum Beispiel ein Programm für den Drucker 
geschrieben und will es zunächst auf dem Bild- 
schirm ausprobieren, braucht man nur OPEN 
#3, „s“ einzugeben und jeder LPRINT-Befehl 
wird auf dem Bildschirm ausgegeben. „s“ be- 
deutet Ausgabe auf den oberen Bildschirmteil, 
„K“ auf den unteren und „p“ auf den Drucker. 
CLOSE #3 stellt den Ausgangszustand wieder 
her. 

Diese Speicherplätze ermöglichen einen völlig 
neuen Zeichensatz, denn hier steht die Adresse, 
an der für jeden Buchstaben und jedes Zeichen 
8 Bytes abgelegt sind, genau wie bei den selbst- 
definierten Graphikzeichen. Diese Systemva- 
riable zeigt auf den Anfang der Tabelle. Da 
aber die Zeichen CHR$ 0 bis CHR$ 31 keine 
druckbaren Zeichen sind, fängt die Tabelle ei- 
gentlich 32%*8 Bytes = 256 Byte später an. Dort 
sind dann die 8 Bytes für das Leerzeichen, dann 
folgt das Ausrufezeichen, die Anführungsstri- 
che usw. Versuchen Sie mal POKE 23606,8. 
Dies verschiebt den Zeiger um 8 Byte = | 
Zeichen. Läßt man diese Variable ins RAM 
zeigen, kann man dort seinen selbst entworfe- 
nen Zeichensatz ablegen. 23606 enthält norma- 
lerweise O und 23607 die Zahl 60. 

Länge des Warntons, wie er zum Beispiel beim 
Drücken einer Taste nach CLEAR 23850 er- 
tönt. Normalerweise 64. 

Länge des Tastaturpieps. Normalerweise 0. 
Hier werden Fehlernummern gespeichert. 255 
= OK; 0 = NEXT without FOR; | = Variable 
not found usw. Versuchen Sie POKE 23610,0. 
Dies kann man aber leider im Programm nur in 
der letzten Zeile verwenden. Allerdings 
funktioniert es dafür in Maschinensprache um 
so besser: Die Systemvariable wird mit der 
gewünschten Fehlernummer geladen und dann 
einfach RST 8 ausgeführt. 


Zahlen und Adressen, mit denen der Interpre- 
ter arbeitet. 


Setzt den Modus des Cursers: O0 = L-Mode; | = 
E-Mode; 2 = G-Mode. (C-Mode siehe Adresse 
23658.) Poked man höhere Zahlen in diese 
Adresse, erscheinen einige recht merkwürdige 
Curser-Arten, die sich effektvoll in INPUTs 
verwenden lassen. 


Diese drei Adressen ermöglichen einen Sprung 
zu einem beliebigen Befehl in einer Zeile und 
nicht nur zum ersten, wie bei GO TO. Auch die 


23621-23623: 


23624: 


23625/23626: 


23627/23628: 


23629/23630: 


23631/23632: 
23633/23634: 
23635/23636: 


23637/23638: 


23639/23640: 


23641/23642: 


23643/23644: 


23645/23646: 


Befehle nach THEN können aufgerufen wer- 
den. Um solche Befehle anzusprechen, poked 
man zuerst die Zeilennummer in die Adressen 
23618/23619 und dann in die Adresse 23620 
die Stelle des Befehls in der Zeile. Der erste 
Befehl in der Zeile hat die Nummer I, der 
nächste Befehl nach einem „:* oder einem 
„IHEN“ die Nummer 2 usw. Existiert kein 
Befehl an der angegebenen Stelle, wird die Feh- 
lermeldung „statement lost“ gedruckt. 
Zeilennummer und Befehlsstelle des gerade be- 
arbeiteten Befehls. 


Diese Variable wird von jedem BORDER-Be- 
fehl gesetzt, aber kann auch benutzt werden, 
um die Farben des unteren Bildschirmteils zu 
setzen. Die Zahl berechnet sich aus 
128#FLASH + 64 BRIGHT + 8#PAPERfar- 
be + INKfarbe. Damit sind auch verschieden- 
farbige INPUTs möglich. Nach jeder Eingabe 
hat der Rand die gleiche Farbe, wie die hier 
gespeicherte PAPER-Farbe richtet sich aber 
nicht nach FLASH und BRIGHT. 

Hier steht die Zeilennummer, die bei EDIT 
editiert wird. 


‚Hier steht die Anfangsadresse des Variablen- 


speichers. Systemvariablen, die den Speicher- 
aufbau festlegen, sollten vom Programmierer 
nicht verändert werden, da der Interpreter 
dann nicht mehr richtig arbeiten kann. 
Adresse einer gerade verwendeten Variable. 
Anfangsadresse der Kanalinformationen. 
Adresse einer verwendeten Kanalinformation. 
Anfangsadresse des Basicspeichers, welcher 
folgendermaßen aufgebaut ist: Für jede Zeile 
zunächst zwei Bytes, die die Zeilennummer 
angeben. Achtung: Diese beiden Bytes stehen 
ausnahmsweise in vertauschter Reihenfolge! 
(Zuerst das höherwertige und dann das nieder- 
wertige.) Dann folgen zwei Bytes, die die Länge 
des Zeilentextes angeben. (Wieder in der übli- 
chen Reihenfolge.) Danach stehen die Kodes 
der Befehle und Zeichen und am Schluß der 
Zeile steht 13 (= ENTER). Übrigens nach jeder 
dezimalen Zahl im Text steht 14, gefolgt von 5 
Bytes, die diese Zahl in ihrer binären Form 
angeben, da der Computer nur damit arbeiten 
kann. (Diese 6 Bytes werden beim normalen 
LISTing verschluckt.) 

Gibt die Adresse der Basiczeile an, die der 
gerade bearbeiteten folgt. 

Diese Adresse zeigt auf das erste Byte, nach der 
zuletzt gelesenen „DATA-Zahl“. In dieser 
Adresse steht dann also entweder 44 (= Tren- 
nungskomma) oder 13 (= Ende der Zeile). 
Wenn noch kein READ verwendet wurde, er- 
gibt diese Systemvariable die letzte Adresse 
vor dem Basicspeicher, ist also um eins kleiner 
als die in 23635/23636 abgespeicherte Zahl. 
Ab der hier angegebenen Adresse steht der Text 
der Zeile, die gerade eingegeben wird. 

Adresse des Cursers im vorherigen Speicherbe- 
reich. Bei einem INPUT steht in dieser Adres- 
se, an welcher Stelle im eingegebenen Text der 
Curser zuletzt stand. (Am Anfang = | usw.) 
Adresse des Zeichens, das beim Ausführen ei- 
ner Zeile als nächstes bearbeitet wird. 
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23647/23648: 
23649/23650: 


23651/23652: 


23653/23654: 
23693: 
23656/23657: 


23658: 


23659: 


23660/23661: 


23662/23663: 
23664: 
23665: 


23666/23667: 
23668/23669: 


23670/23671: 
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Adresse des Zeichens nach einem „?*-Curser. 
Anfangsadresse des INPUT-Speichers. 


Anfangsadresse des Arbeitsspeichers des 


ROM-Rechenteils (Kalkulator). 


Anfangsadresse des Speichers, der zur Zeit 
keine besondere Aufgabe hat, also vom Pro- 
grammierer frei verfügbar ist. (Dazu auch 
23730/23731.) 


Speicherstelle des Kalkulators (des ROM- 
Rechners). 


Adresse, an der der Kalkulator bis zu 6 Flies- 
kommazahlen zwischenspeichert. Normaler- 
weise 23698. 


Diese Variable ermöglicht das Umschalten auf 
den „C*-Curser (POKE 23658,8). Um den nor- 
malen Curser wieder zu erhalten, muß man 
diese Adresse auf O setzen. 


Angabe der Zeilenzahl des unteren Bildschirm- 
teils. Diese Speicherzelle wird von jeder Fehl- 
meldung und jedem INPUT auf 2 gesetzt (Zeile 
22 ist leer und Zeile 23 wird bedruckt). Man | 
kann die 22ste Zeile ganz normal mit PRINT 
AT 22,0; benutzen, wenn in diese Adresse | 
gepoked wird. Man kann aber auch den IN- 
PUT auf eine andere Zeile setzen, indem man 
INPUT AT n.0; AT y,x:a$ eingibt. n+1 ist die 
Anzahl der unteren Zeilen, y gibt die Zeile des 
unteren Bildschirmiteils an, dessen Zeilen hier 
von O bis n durchnumeriert sind. x gibt schließ- 
lich noch die Spalte an. Enthält diese Speicher- 
zelle 0 oder eine Zahl, die größer ist als 24, darf 
nicht auf den unteren Bildschirmteil zugegrif- 
fen werden, da sonst der Interpreter nicht wei- 
terarbeitet und keine Taste mehr annımmt 
oder einfach NEW ausgeführt. (Dies ist also gut 
als BREAK-Schutz in einem Basicprogramm 
zu verwenden, da die BREAK-Meldung ja 
auch dorthin gedruckt wird.) Nun kann man 
aber auch auf den unteren Bildschirm drucken: 
PRINT #1; AT y,x; Die Zeile errechnet sich 
wieder von der obersten Zeile des unteren Bild- 
schirms, die man ja mit dieser Systemvariable 
verändern kann. Wurde der untere Bildschirm 
noch nicht verwendet, wird PRINT #1;a$ au- 
tomatisch unten AT 1,0; gedruckt. Ansonsten 
kann man PRINT #1 genauso wie PRINT 
verwenden. INPUT “** löscht den unteren Bild- 
schirm und setzt diese Variable wieder auf 2. 
Gibt die Zeilennummer der obersten Zeile 
beim automatischen Listing an (nach der Ein- 
gabe von ENTER ohne LIST). 

Zeilennummer in einem Basicprogramm, zu 
der CONTINUE nach einem BREAK springt. 
Befehlstelle in der Zeile, die in der vorherigen 
Systemvariable angegeben wurde, zu dem 
CONTINUE nach einem BREAK springt. 
Zwischenspeicher des Interpreters. 

Wird bei der Bearbeitung von Strings benutzt. 
Zeiger für eine Tabelle im ROM, mit der der 
Interpreter die Syntaxprüfung durchführt. 
Diese Speicherzellen werden von der Zahl hin- 
ter RANDOMIZE gesetzt. Bei RANDOMIZE 
oder RANDOMIZE O werden die Inhalte der 
Speicherzellen 23672/23673 genommen. 


23672-23674: 


23675/23676: 


23677: 


23678: 


23679-23683: 


23684/23685: 
23686/23687: 


23688-23691: 


23692: 


23693: 


23694: 


23695: 


23696: 


23697: 


Diese Speicherzellen enthalten beim Einschal- 
ten des Gerätes alle 0. 23672 wird alle 50stel 
Sekunden um eins erhöht. Wenn diese Adresse 
255 erreicht, wird sie auf O0 gesetzt und 23673 
um eins erhöht. Das gleiche gilt bei 
23673/23674. Die Einschaltzeit berechnet sich 
also mit PRINT INT (( PEEK 23672+256* 
PEEK 23673+65535* PEEK 23674)/50). Dieser 
Zählvorgang wird allerdings von jedem BEEP 
und den Cassettenroutinen unterbrochen. 


Enthält die Anfangsadresse der selbstdefinier- 
baren Graphikzeichen. Wenn man zum Bei- 
spiel seinen 16K Spectrum auf 48K erweitert 
und Graphikzeichen vorher mit CODE auf 
Cassette abgespeichert hat, braucht nur POKE 
23676.127 eingegeben zu werden und man hat 
die Graphikzeichen wieder zur Verfügung. Au- 
Berdem kann man hiermit im Programm zwi- 
schen mehreren selbstdefinierten Graphikzei- 
chensätzen umschalten und ist nicht mehr auf 
die „wenigen“ 21 beschränkt. 


X-Koordinate des zuletzt gePLOTeten Punk- 
tes. 


Y-Koordinate des zuletzt gePLOTeten Punk- 
tes. 


Hier werden Positionen bei der Ausgabe ge- 
speichert. 


PRINT-Position im Bildschirmspeicher. 


PRINT-Position des unteren Bildschirmteils 
im Bildschirmspeicher. 


Wird bei der Berechnung von PRINT-Positio- 
nen verwendet. 


Diese Speicherzelle gibt an, wie oft der Bild- 
schirm um eine Reihe nach oben geschoben 
werden soll, bevor nach „scroll?“ gefragt wird. 
0 heißt hierbei 256mal. Übrigens kann man 
einen schnellen Bildschirmscroll mit RANDO- 
MIZE USR 3582 erreichen, ohne etwas zu 
drucken. Da RANDOMIZE sich aber auf Zu- 
fallszahlen auswirkt, ist es manchmal zu emp- 
fehlen zum Beispiel LET u=USR 3582 oder IF 
USR 3582 THEN zu verwenden. 


Hier werden die Farben gespeichert, die mit 
den Farbbefehlen gesetzt wurden: 128*FLASH 
+64*BRIGHT +8*PAPERfarbe +INKfarbe. 
Mit einem POKE kann man sich also mehrere 
Befehle ersparen. 


Außergewöhnliche Farbinformationen: 

128, wenn FLASH 8 
+ 64, wenn BRIGHT 8 
+ 56, wenn PAPER 8 
+ 7, wenn INK 8 
Enthält bei der Ausführung von PRINT zu- 
nächst das gleiche wie 23693, und wird dann 
nach den Farbbefehlen im PRINT geändert. 
Enthält bei der Ausführung von PRINT zu- 
nächst das gleiche wie 23694, und wird dann 
nach den Farbbefehlen im PRINT geändert. 


Weitere Farbinformationen: 


192. wenn PAPER 9 
+ 48, wenn INK 9 
+ 12, wenn INVERSE | 
+ 3, wenn OVER I 
Für Maschinencode-Programmierer: BIT 
7/85 
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7=PAPER 9, BIT 5=INK 9, BIT 3=INVERSE |, 
BIT 1=OVER |. Die anderen Bits können im 
PRINT verändert werden. 

Normalerweise benutzt der Kalkulator diese 
Speicherzellen, um bis zu sechs Fließkomma- 
zahlen zwischenzuspeichern, die je 5 Bytes ver- 
brauchen. (Dazu auch 23656/23657.) 

Wenn ein externes Gerät an den ZX Spectrum 
angeschlossen ist und ein Unterbrechungssi- 
gnal sendet, wird NEW ausgeführt. Wenn in 
diesen Speicherzellen andere Werte als O ste- 
hen, passiert nichts. 

Adresse nach dem letzten Byte des frei verfüg- 
baren Speichers. Der freie Speicherplatz be- 
rechnet sıch übrigens aus PRINT 65535-USR 
7962. Mit dieser Formel erhält man den am 
besten gesicherten Wert, da es dasselbe Verfah- 
ren ist, das auch der Interpreter verwendet. 
Adresse des letzten Bytes überhaupt im RAM. 
Beim 16K Spectrum als 32767 und beim 48K 
Spectrum 65535. 


23698-23727: 


23728/23729: 


23730/23731: 


23732/23733: 


Mailbox- 
Telefonbuch 


Bei Warnekes Mail-Telefon- 
buch handelt es sich um eı- 
nen neuen Zubehörartikel der 
Computerbranche. Zur Zeit 
enthält dieses DFÜ-Anbie- 
ter-Verzeichnis ca. 
schiedene Mail-Box-An- 
schlüsse. Für 1986 ist eine 
wesentlich erweiterte Ausga- 
be geplant. 

Zur Benutzung des Buches 
zwei Hinweise: In den Rubri- 
ken „Betriebszeit“ und „Be- 
merkungen“ erscheinen 


150 ver- | 


teilweise die Begriffe „wird 
getestet“ und „wird geprüft“. 
Bei Redaktionsschluß lagen 
hier noch keine exakten In- 
formationen vor, deshalb er- 
scheinen in diesen Fällen die 
o. a. Begriffe. 

Für die Rubrik „Bemerkun- 
gen“ ıst geplant, z. B. den Er- 


| öffnungsmodus der Mailbox 


und die Paßwörter etc. sowie 
eine kleine Beschreibung des 
Betriebssystems und des 
Operators einzutragen. 


Befehlserweiterung des CPC- 


Ir 
; 
6 


Dieses Assembler und Basic- | Nach einmaligem Aufruf der | 
programm bewirkt eine Be- | Maschinencoderoutine kann | 
fehlserweiterung des CPC- | diese gelöscht werden und der 
Befehlssatzes um einen BOX- | Befehl befindet sich dann in | 
Befehl. | der RSX-Erweiterung im 


Befehlssatzes 
um einen Box-Befehl 


RAM. 

Die Parameter des Befehls 
lauten wie folgt: 

x1+yl - Startposition befin- 
det sich Ecke links unten 


| 


x2+y2 - Endposition befin- 
det sich Ecke rechts oben. 
Der letzte Parameter-Befehl 
bestimmt die Farbe. 


HEUER THHHK IT HT N N HH HR 
"##%#%* :BOX BEFEHL FUER CPC x##%#%%+ 
"»X*## M.BANGEMANN 1985 LE 2 2 2 20 
HRRRERERFHEHRRHEUHHHR NH HT HF NR FR 


"BASIC LADER FUER MC PROGRAMM 


h=HIMEM 

MEMORY %&BOöF 

FOR i=%&8070 TO &8OCB 
READ x:POKE i,x 

NEXT 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
CALL %8070 

MODE 2: INK 0,13:BORDER 13:INK 1,0 
LOCATE 1,12:PRINT" (D)isc oder 
as=INKEYf: IF a$="" THEN 230 


"Sichern der Befehlserweiterung auf Cassette oder Disc 


(C)Jassette ?" 


%.01,&79,%80,%21,%82,%80,%c3,%d1,%bc ,%7e,%80,%03,%86,%80,%42,%4# 
%48,%00,&00,%00,%00,%00,%fe,%05,&c0,%cd,%c6,%bb,&dS,%eS,&dd,%&7e,&00 
%cd,%de,&bb,%dd,%56,%09,%dd,%5e,&08,%dd,%66,%&07,%dd,%be,%06,%e5,%d5 
%&d5,%cd,%c0,%bb,%d1,%d5,%dd,%66,%03,%dd,%6e,%02,%e5,&cd,%fb,%bb,kel 
%4d4,%56,%05,%dd,%S5e,%04,%45,&cd,%f6,%bb,%di,&el,&cd,&t6,&bb,&di,kel 
%cd,%f6,%bb,&eil,%&d1,%c3,%&c0,%bb 
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240 IF as="D" OR a$="d" THEN PRINT"Bitte formatierte Diskette einlegen und Taste 


druecken" 


250 
253 
255 
256 
270 
280 
290 


ELSE 253 


CALL %BB18:60T0 256 
ON ERROR GOTO 256 


ıTAPE 


SAVE"BOX.BIN",B,%8070,123 
INK 1,1,0:MODE 2:LOCATE 1,12 


PRINT" 
NEW 


Vor weiteren Eingaben MEMORY ";5hz;" eingeben !!!" 


een — 


Demonstrationsprogramm 


10 
20 
30 M 
40 
so 


MODE 1 
INPUT "Schrittweite";sc 


ODE 0 


x1=0: y1=0:x2=639: y2=399 
FOR durch=1 TO 320 STEP sc 


60 
70 
80 
90 


!BOX,x1,y1,x2,y2,durch/sc 
xi=x1+scı yl=yl+scıx2=640-x1:y2=400-y1 


NEXT 


CALL %&BB18 


100 CLEAR:GOTO 10 


“,z 


BBDE 
BBF6 
BCDl 
BBCO 
BBC6 


8070 
8070 
intr 
8073 
8076 
8079 
807B 
807E 
8080 
8081 
8082 
8086 
8088 
8089 
808C 
808D 
808E 
8091 
8094 
8097 
809A 
809D 
80AO 
80Al 
80A2 
80A3 
830A6 
80A7 
80A8 
ke 


0179830 
agen 
2182830 


DD6603 
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EEK TH TFT T T TH TH TH N TE a a a a a a a a a a h ka ka ha ah 


RSX - ERWEITERUNG DES CPC ***t*%* 
NACHLADBARER BOX - BEFEHL ****** 
COPYRIGHT 1985 


Luz z 
skkek 
arr% 


aAkk% 


MARTIN BANGEMANN 


NAGOLD 


arikh% 
kukkhr 


CERKKRKKHK KK KH KH TH TH KH TH A A a a a a a a a a a a a a a ae 


’ 
SETPEN: 
DRAWAB: 
LOGEXT: 
MOVABS: 
ASKCUR: 


RSX: 


TABLE: 


KERNEL: 
BOX: 


EQU 
EQU 


#BBDE 
#BBF6 
#BCDl 
#BBC0 
#BBC6 


#3070 
BC, RSX 


HL, KERNEL 
LOGEXT 
TABLE 
BOX 
"Bo" 
"x"+#830 
0 

4 

5 

NZ 
ASKCUR 


H, (IX+7) 


H, (IX+3) 


;Penfarbe setzen 

;Linie ziehen 
‚Erweiterung einbinden 
‚Grafikcursor setzen 
‚Ausgangsposition Cursor 


;MC-Startadresse 
‚Box in die Erweiterung e 


;5 Parameter holen 


‚Ausgangsposition merken 


;Penfarbe setzen 
;linke untere Ecke (xl) 


‚linke untere Ecke .(yl) 


‚xl yl merken 


;y2 von rechter oberer Ec 
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80AB DD6EO2 430 LD L, (IX+2) 

SUAE E5 440 PUSH HL ;‚y2 merken 

80AF CDF6BB 450 CALL DRAWAB ‚Linie von (xlyl) nach (x 
ly2) 

80B2 EI 460 POP HL :y2 holen 

30B3 DD5605 470 LD D, (IX+5) ;x2 rechte obere Ecke 
80B6 DD5SEO4 480 LD E, (IX+4) 

80B9 D5 430 PUSH DE ‚2 merken 

80BA CDF6BB 500 CALL DRAWAB ‚Linie von (xly2) nach (x 
2y2) 

80BD Di 510 FOP DE ıx2 holen 

SOBE Ei 520 POP HL ;yl holen 

80BF CDF&B 530 CALL DRAWAB ‚Linie von (x2y2) nach (> 
2y1l) . 

S0OC2 Di 540 FOP DE xl holen 

8s0C3 Ei 550 POP HL ;yl holen 

80c4 CDFEDBB 560 CALL DRAWAB ;Linie zum Ursprung 
Hisoft GENA?3.1 Assembler. Fayge 2 

30C7 ‘El 570 FOP HL ‚Cursorausqangspöosition 
80C8 Dl 550 FOP DE ‚wiederherstellen 

80C93 C3COBB 59I0 JP MOVABS 


Pass 2 errörs: 00 


Table used: 123 


M 68000-Familie 


Teil 1: Grundlagen und Architektur — Teil 2: Anwendung und 68000- 


Dieses zweibändige Werk be- 
faßt sich grundlegend mit der 
M 68000-Familie, einer Fa- 


milie von leistungsfähigen | 


16/32-Bit-Prozessoren. Der 
Leser findet alle notwendigen 
Informationen über den M 
68000. Angefangen von der 
Entstehungsgeschichte über 
die detaillierte Hardwarebe- 
schreibung bıs zu den Adres- 
sierungsarten und dem aus- 
führlichen Befehlssatz. Es 
eignet sich sowohl als Lehr- 
buch als auch als Nachschlag- 
werk. 

In Band | werden die Grund- 
lagen geschaffen und die Ar- 
chitektur (Hard- und Softwa- 
re) mehr oder weniger theore- 
tisch behandelt. Entstehungs- 
geschichte und Zweitherstel- 


ler finden Sie ın Kapitel |, | 


Grundlagen über eine micro- 
codierte CPU und die Be- 
schreibung der Pins des 
68000-Bausteines sind in Ka- 
pitel 2 ausführlich dargestellt. 
Wichtige Ausdrücke und De- 
finitionen, die Ihnen in bei- 


„185 


Bausteine 


den Bänden begegnen wer- | 68000-Familie. In Kapitel 10 | nen, die von Grundlagen neu- 
den, sind gleichfalls in Kapi- | wird der VME-Bus beschrie- | er Programmiertechniken 
tel 2 niedergeschrieben. | ben. | oder Betriebssysteme über 
Adressierungsarten und Be- | Beide Bände zusammen ver- | Peripherie-Bausteine bis zur 
fehlssatz folgen mit sehr vie- | mitteln über den eigentlichen | nächsten Generation der 
len Beispielen in Kapitel 3 | Prozessor hinaus Informatio- | 68000-Produkte reichen. 
bzw. 4. Das letzte Kapitel die- 
ses Bandes setzt sich mit den 
68000-Versionen auseinan- 
der — den sogenannten Mas- 
ken. k 

Der Band eignet sich unter 
anderem für diejenigen, die 

sich schon eingehender mit Fa | 
M 68000 beschäftigt haben. 


In Band 2 findet der Leser M 00 
zusätzliche Informationen | 
A : TEN 


und praktische Hinweise für 
das Arbeiten mit dem M 
68000. So kommen die 
Software (Kapitel 6: Assem- 
blerprogrammiertechnik mit | 
M 68000-Befehlen) und die 

Hardware (Kapitel 9: Ein 
M 68000-Single-Bordsystem) 
auf keinen Fall zu kurz. Die 
Kapıtel 7 und 8 beschäftigen 
sich mit Peripherie-Baustei- 
nen und mit neuen bzw. zu- | 
künftigen Mitgliedern der | 


2 
ANWENDUNG UND 68000-BAUSTEINE 


Werne: Hilf - Anton Nausch 
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ALIEN ATTACK 


Ein schnelles Weltraumspiel für MSX-Computer 


Geben Sie als erstes die Zei- 
len 340 und 350 sowie dıe 
Zeilen 2000 bis 2060 ein. Die- 
se Programmzeilen ermögli- 
chen einen ordnungsgemäßen 
Abbruch des Programmes 
sowie die korrekte Ausgabe 
von Fehlermeldungen. 

Zur weiteren Programmeın- 
gabe verwenden Sie den Be- 
fehl AUTO 100 und die Zeı- 
lennumerierung wird auto- 
matisch rıchtig vorgegeben. 
In Zeile 1170 finden Sie eine 
Menge Grafikzeichen, deren 
Eingabe relativ schwierig ist. 
Zur Eingabeerleichterung ist 
jedoch ın Zeile 1180 dıe Ta- 
stenfolge beschrieben: 

g bedeutet (GRAPH) Taste 

c bedeutet (CODE) Taste 

S bedeutet (SHIFT) Taste 
Danach folgt der Buchstabe 
oder das Zeichen, welches 
ebenfalls gedrückt werden 
muß. 

So bedeutet z. B. [gSM] daß 
die Tasten (GRAPH) 
(SHIFT) und (M) gleichzeitig 
gedrückt werden müssen. 
Nach der Programmeingabe 
starten Sie das Programm 
mittels der Funktionstaste 
(F5). Sie bekommen einen 
Hinweis auf den Bildschirm, 
und müssen einen Augen- 
blick warten, da der Rechner 
4 Grafikseiten zu belegen hat. 
Dann erscheint das Titelbild, 
und die Musik ertönt. 

Die Musik spielt dıe ganze 
Zeit über, kann jedoch zu je- 
dem Zeitpunkt durch einen 
Druck auf die (SELECT) Ta- 
ste abgestellt werden. Ein er- 
neuter Druck auf (SELECT) 
stellt die Musik wıeder an. 
„ALIEN ATTACK“ kann 
mit jedem beliebigen Joy- 
stick, oder auch mittels der 
Cursortasten gespielt werden. 
Um auszuwählen womit Sie 
spielen wollen und um das 
Spiel zu starten, drücken Sıe 
einfach den entsprechenden 
Aktionsknopf, oder die Leer- 
taste, wenn Sie mittels der 
Cursortasten spielen wollen. 
Die Titelschrift verschwin- 
det, und Ihre Laserkanone er- 
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scheint am unteren Bild- 
schirmrand. 

Kurz darauf erscheint auch 
das erste ALIEN, welches Sie 
abschießen müssen. 
Vorsicht. die ALIENs verfol- 
gen Ihre Laserkanone und 
versuchen diese Kanone 
selbst abzuschießen. Das 
Spiel kennt 5 verschiedene 
Arten von ALIENs und hat 6 
Level, wobei sich die Ge- 
schwindigkeit steigert. 
Steuern Sie mittels des Joy- 
sticks (oder (Cursortasten) 
Ihre Laserkanone nach rechts 
oder links. Einen Schuß lösen 
Sie mittels des Aktionsknop- 
fes (oder Leertaste) aus. 
Wenn Sie ein ALIEN getrof- 
fen haben, so wird es explo- 
dieren, und Ihnen werden, je 
nach Aggressivität, 10 bıs 60 
Punkte gutgeschrieben. 
ALIENs treten immer ın 
Wellen auf. Eine Welle be- 
steht aus 4+2*Level ALIENs. 
Das heißt in Level I haben 
Sie gegen 6 ALIENSs zu beste- 
hen, in Level 6 müssen Sıe es 
mit 16 ALIENs aufnehmen. 
Wenn Sie eine Welle bestan- 
den haben, so kommt eine 
andere Art von ALIENSs ge- 
gen die Sie kämpfen müssen. 
Wenn Sıe Level 6 überstan- 
den haben, so wechseln zwar 
die Arten der ALIENs alle 16 
Treffer, aber die Geschwin- 
digkeit bleibt. 

Die ALIENs haben die unan- 
genehme Eigenschaft auf Ihre 
Laserkanone zu schießen. 


Anfangs haben Sie 3 Kano- 
nen zur Verfügung (eine im 
Spiel und 2 als Reserve). 
Wird Ihre Kanone von einem 
ALIEN getroffen, so explo- 
diert diese. Wenn alle 3 Ka- 
nonen zerstört wurden, er- 
scheint „GAME OVER* auf 
dem Bildschirm. 

Um ein neues Spiel zu star- 
ten, drücken Sie wieder einen 
beliebigen Aktionsknopf. und 
das Spektakel geht von vorne 
los. 

ALIEN ATTACK arbeıtet ım 
32x24 Zeichen Textmodus 
(SCREEN |) und generiert 
die komplette Grafik durch 
Zeichensatz Umbelegung. 
Die Farben werden mittels 
Eintragungen in die Farbcode- 
Tabelle erzeugt. 

Dieser „Grafikmodus“ er- 
laubt es, bis zu 14 Grafiksei- 
ten zu schreiben, und durch 
Einträge in das VDP Register 
2 zwischen diesen Grafiksei- 
ten umzuschalten. 

ALIEN ATTACK _ benutzt 
nun lediglich 4 dieser Grafik- 


seiten, zwischen denen ca. 
alle 0.25 Sekunden umge- 


schaltet wird. 

Alle 4 Grafikseiten sind ın ıh- 
rer Grundgrafik gleich, zeigen 
jedoch Veränderungen. 

Da eine Grafikseite eınen 
kompletten Bildschirm um- 
faßt, und jetzt vier verschie- 


dene Bilder relativ schnell 
hintereinander geschaltet 
werden, erhalten wir einen 
Zeichentrickfilm ähnlichen 
Effekt. 
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288 DATA 29,1,3,0,29,1,3,0,254,0,97,3,254,8,87,3,29,1,166,2,29,1,166,2,29,1,59,2 
‚29,1,58,2,29,1,87,3,29,1,87,3,83,1,166,2,83,1,166,2,83,1,58,2,83,1,58,2,124,1,8 
7,3,124,1,87,3,171,1,166,2 

218 DATA 171,1,166,2,83,1,58,2,83,1,58,2,29,1,87,3,29,1,87,3,29,1,166,2,29,1,166 
‚2,29,1,58,2,29,1,58,2,252,1,248,3,252,1,248,3,171,1,87,3,171,1,87,3,171,1,58,2, 
171,1,58,2,124,1,248,3 

228 DATA 124,1,248,3,171,1,87,3,171,1,87,3,124,1,58,2,124,1,58,2,83,1,87,3,83,1, 
87,3,29,1,166,2,29,1,166,2,29,1,58,2,29,1,58,2,29,1,87,3,29,1,97,3,29,1,166,2,29 
‚1,166,2,29,1,58,2,29,1 

2308 DATA 58,2,254,8,87,3,254,8,87,3,29,1,166,2,29,1,166,2,29,1,58,2,29,1,58,2,29 
‚1,87,3,29,1,87,3,83,1,166,2,83,1,166,2,83,1,58,2,83,1,58,2,124,1,87,3,124,1,87, 
3,171,1,166,2,171,1,166,2 

248 DATA 83,1,58,2,83,1,58,2,29,1,87,3,29,1,87,3,29,1,166,2,29,1,166,2,29,1,58,2 
‚29,1,58,2,252,1,248,3,252,1,248,3,171,1,87,3,471,1,87,3,171,1,58,2,171,1,58,2,1 
24,1,248,3,124,1,248,3 

258 DATA 171,1,87,3,171,1,87,3,124,1,58,2,124,1,58,2,83,1,87,3,83,1,87,3,171,1,1 
66,2,171,1,166,2,124,1,58,2,124,1,58,2,171,1,87,3,171,1,87,3,171,1,166,2,171,1,1 
66,2,171,1,58,2,171,1 

268 DATA 58,2,252,1,248,3,252,1,248,3,171,1,87,3,171,1,87,3,171,1,58,2,171,1,58, 
2,124,1,248,3,124,1,248,3,171,1,87,3,171,1,87,3,124,1,58,2,124,1,58,2,83,1,87,3, 
83,1,87,3,29,1,166,2,29,1 

278 DATA 166,2,29,1,58,2,29,1,58,2,29,1,87,3,29,1,97,3,29,1,166,2,29,1,166,2,29, 
1,58,2,29,1,58,2,254,0,87,3,254,8,87,3,29,1,166,2,29,1,166,2,29,1,58,2,29,1,58,2 
»29,1,87,3,29,1,87,3,83,1 

288 DATA 166,2,83,1,166,2,83,1,58,2,83,1,58,2,124,1,87,3,124,1,97,3,171,1,166,2, 
171,1,166,2,83,1,58,2,83,1,58,2,29,1,37,3,29,1,87,3,29,1,166,2,29,1,166,2,29,1,5 
8,2,29,1,58,2,252,1,248,3 

298 DATA 252,1,248,3,171,1,87,3,171,1,87,3,171,1,58,2,171,1,58,2,124,1,248,3,124 
‚1,248,3,171,1,87,3,171,1,87,3,124,1,58,2,124,1,58,2,83,1,87,3,83,1,87,3,171,1,1 
66,2,171,1,166,2,124,1 

3088 DATA 58,2,124,1,58,2,171,1,87,3,171,1,87,3,171,1,166,2,171,1,166,2,0,0,0,8 
318 CLEAR 688 

328 DEFINT D,I,J,K,L,T,W 

338 DEFSTR A 

348 ON STOP GOSUB 2836:5TOP ON 

358 ON ERROR 60T0 2048 

368 DIM DP(4) 

378 GOSUB 1898 

388 J=48:FOR I=8 TO 2:PUT SPRITE 1,(J,8),8,1:J=J+32:NEXT 

398 J=48:FOR 1=3 TO 5:PUT SPRITE 1,(J,48),7,1:J=J+32:NEXT 

486 J=24:FOR I=6 TO 9:PUT SPRITE 1,(CJ,808),3,1:J=J+32:NEXT 

418 VDP(1)=227:BC=8 

428 ON INTERVAL=12 G0SUB 838:RESTORE:SOUND 7,56:MS%=-1:INTERVAL ON 

438 FOR JV=8 TO 2:J=RND(C64):IF STRIG<CJV) THEN 458 

448 NEXT :G60T0 438 

458 DA=8:T2=8:BC=-1 

466 FOR I=8 TO 9:PUT SPRITE 1,(8,8),8,63:NEXT:ON STRIG 60SUB 10890,18890,1988 

478 VDP(C1)=226:BP=8:P=8:PK$=STR$(CP):LG6=3:TA=8:KP=128:LK=8:DN=8:DL=8:LV=1:PUT SPR 
ITE 8,CKP,148),6,18:5TRIG(JV) ON 

488 IF BC THEN 4886 

498 DS=RND(C2808)K2088+24:DA=-1:STRIGCJV) ON 

588 ON STICK(CJV) 60SUB 888,8108,810,810,808,820,820,828 

518 VPOKE &H1B81,KP 

528 IF DE THEN 5580 
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EEE 


4:5P 
768 
778 


1868 
1076 
1988 
RETU 
1898 


IF DD THEN 618 

60T0 588 

L6=L6-1:T2=8:BP=-1 

SOUND 6,38:S0UND 7,28:PUT SPRITE ®8,(KP,148),9,36:FOR I=15 TO 8 STEP -1:SOUND 
1:PUT SPRITE 8,CKP,148),9,39-CIDı4:FOR K=1 TO 28:NEXT K,l 

SOUND 18,8:5S0UND 7,56:bE=8 

IF BP THEN 588 

IF LG6=8 THEN 748 

KP=128:PUT SPRITE 8,<CKP,143),6,18:60T0 588 

P=P+18%XLV: IF PY999999'! THEN P=999999! 

PK$=STR$(P):BP=-1:T2=8 

SOUND 6,18:SOUND 7,28:PUT SPRITE 1,(D8,32+bDV),11,32:FOR I=15 TO 8 STEP -1:50 
18,1:PUT SPRITE 1,(DS,32+DV),11,35-CI>\4:FOR K=1 TO 28:NEXT K,I:PUT SPRITE 1 
08),80,63 . 

DD=8:SOUND 18,8:50UND 7,56:DE=-8:TA=-TA+1i 

IF BP THEN 658 

IF TA=4+2*XLV THEN 678 ELSE 498 

DN=DN+1:IF DN>4 THEN DN=8 

LV=sLV+1:IF LV>6 THEN LV=6 

TA=8:60T0 498 

FOR J=1 TO LENCPK$):VPOKE &H498%JB+713+J,ASCCMIDSCPKS,J,1>): NEXT 

TZ=TZ2+1:IF TZ=4 THEN BP=B8 

VPOKE &H488%JB+729-L6,32 

RETURN 

STRI6<CJV) OFF:DA=8:FOR I=8 TO 3:PUT SPRITE 1,(8,0),8,63:NEXT:VDPc1)=227 
SP=16:FOR I=8 TO 3:PUT SPRITE 1,(SP,16),8,48+1:PUT SPRITE 4+1,(5P,58),12,1+4 
=5P+32:NEXT 

G0OTO 438 

FOR J=715 TO 728:VPOKE &H480%JB+J,32:NEXT:FOR J=727 TO 728:VPOKE &H4088XJB+J, 


:NEXT:VPOKE &H40808%JB+715,48 


T2=T2+1:IF TZ=4 THEN BC=6 
RETURN 
RETURN 
KP=ABSCCKP+3)KCKP<224)+224%CKP)>=224)):RETURN 
KP=ABSCCKP-3)KCKP>16)+16%CKP<=16)>: RETURN 
IF INKEY$=CHR$(24) THEN MS%=NOT MS% 
IF MS% THEN SOUND 8,18:SOUND 9,9 ELSE SOUND 8,9:50UND 9,8:60T0 870 
READ M1%,M2%,M3%,M4%: IF M1%=8 THEN RESTORE:S50TO 858 
SOUND 8,M1%:SOUND 1,M2%:50UND 2,M3%:SOUND 3,M4% 
IF BP THEN G0OSUB 788 
IF BC THEN GOSUB 778 
VDP<2)=JB:JB=JB+1:IF JB>3 THEN JB=8 
IF NOT DA THEN 978 
DV=RND<128)%18-5:DS=DS+2XLVXKSGNCKP-DS) 
PUT SPRITE 1,<D5,32+DV),15,DPCDN>+JB 
IF DE THEN RETURN 
IF DL THEN 988 
IF ABSCKP-DSICCSB+LV> THEN LD=51:PUT SPRITE 2,<CDS,Lb3,9,48:DL=-1 
IF LK THEN 1828 
RETURN 
LD=LD+8&LV: IF LD>148 THEN 998 ELSE VPOKE &H1B88,LD:60T0 1818 
IF ABS(CVPEEK(&H1BB9)-KP)<12 THEN 1968 
DL=8:PUT SPRITE 2,(8,9),8,693 
IF NOT LK THEN RETURN 
KT=eKT-48:IF KT<32 THEN 1836 ELSE VPOKE &H1BOC,KT:SOUND 18,KT\8:60T0 1858 
LK=8:SOUND 7,56:S0UND 18,8:IF ABS(VPEEK(&HABBD)-DS?<C9 THEN 10878 
PUT SPRITE 3,(8,80),8,63:5TRIG6(CJV> ON 
RETURN 
PUT SPRITE 2,(8,8),0,63:PUT SPRITE 3,8,8),0,63:DL=8:bDE=-1:RETURN 
PUT SPRITE 2,(8,8),8,63:PUT SPRITE 3,(0,0),0,63:DL=8:DA=8:bD=-1:RETURN 
STRIGCJV> OFF:KT=132:PUT SPRITE 3,(KP,KT),7,11:S0UND 7,28:SOUND 6,18:LK=-1: 
RN 
KEY OFF:SCREEN1,3,8:WIDTH32:605SUB 132% 
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1166 IA=6:IE=15:505SUB 1988: IA=32:1E=223:605UB 1999:50SUB 1694:RESTÜRE 1378:CQLOR 
1,1,1:WIDTH32:BASE<C7)=&H13088 

1118 FOR WUl=8 TO 3:VDPC1)=162:BASECS>=WIXK&H488:SCREENA1:VDP(C1>=162 

1128 FÜR I=1 TO 28:K=RND(128)%512: J=RND(6E4)%580: IF J<250 THEN VPOKE BASE(CSI+K,12 
1 ELSE VPOKE BASE(S>+K,122 


1138 NEXT 
1148 LOCATE 9,15:PRINT"cbhaaaaaaaabbco":READ A:LÜCATE 8,16:PRINT"ccha‘yfed"+A+"de 
tg‘abcec" 

1156 FOR 1=17 TO 28 .RERb HR:LOCATE 8, 1I:PRINTRA:NEXT 

1168 LUCATE 8,21:PRINT"2ILELPLPZ2FPLLLT2LLLLPLLLIOLIRALRR" :LOCATE 8,22:PRINT"2I2SR 
9 2. 0 xx QIRLRR"+CHRSCZUI+CHRSCIO) 


1178 LOCATE 8,23:PRINT"2I22PILLTLICHUHr2:- HOMTLLPILORLE" +CHRSCIOI+CHRFCZB): VPOKE 
BASE(5)+767,12 

1186 REM ee I EREIN) 

1196 LOCATE 21,2:PRINT"aABCDE":LOCATE 21,11:PRINT"PRRSTU" 

1288 LOCATE 208,3 ERRANTIER Ta I=4 TO 3:1L0CATe 19,1:FPRINT CHRFÄÜI+SYI)+H"tttt 
ttttE"+CHR$ECI+6ESI:NEXT:LUGATE 28,18: PRINT"ÜOttttttN" 

1218 LOCHTE 25,3:PRINTCHRSCC3ZZ+WIDK4)+CHRFSCC3EZ2+UTIK4+29 LUOCATE 25,4: PRINTCHRSCCZ 
E+WIDX4HL)+CHRSCCI2+UL,K4H+ 3 5 

1226 LUSATE 22,3: PRINTCHRSCC3Z+WIIK4 I +CHRECCHZ+UL)K4+2) : LOCHTE 22,18: PRINTCHRSCK 
32+WID>k4 +1) +CHRSECC3Z+WUI)K4 +3) 

1238 LOCATE 26,8: PRINTCHRSCC3E+WIDKAI +CHRECCIE+WUIIK4+2) :LOCATE 26,9: PRINTCHRSCCZ 
B+WIIX4+HLI+CHRSKCIEHUL)K4 +3) 

12468 LUCHTE 24,6:PRINTCHRSCC3BS+WIDKAI+CHRSCCHE+WI) K4+ 23: LOCATE 24,7: FRINTCHRS$C(CS 
6+WID>K4+1)+CHRELCI3E+H+WUTIK4 +3) 

1258 LUÜCATE 28,4:PRINTCHRSCC48+4XWI 3 K4 > +CHRSCCI4O+4KWIT I) K4+2)3:LOCATE 28,5:PRINTCHR 
$CcC4B+r4XWI)K4H+ 13 +CHRECCIHHr4&XW IT) 4 +3) 

1268 LÜCHTE 28,6: PRINTSHRSCCHZ+4KWIIKA4I +CHRSCCIZL+4KWLIK4+2 9: LOCHTE 28,7:PRINTCHR 
$0C42+4$UID>k4+ 13 +CHRSECC42Z+4 KW) K4 +3) 

1276 LOCATE 22,4: PRINTCHRSCCHL+IEWIDIKAIS+CHRSCCAI1+4KUT I K4 +23: LOÖHTE 22,5:PRINTCHR 
SCC41r43KWI)KI+LI+CHRECCAL+4KUT 3) 4 +3) 

1288 LUCATE 22,6:PRINICHRSC43+4KWIIK4) +CHRFLC4I+4KUIIK4+2 93: LOCHTE 22,7:PRINTCHR 
$CC43+4kWUID)K4+ 1) +CHR$CCI3+4KUT) 4 +3) 

12968 NEXT WI 

153886 VDPi13=162:VDP(45=5:VbDPi6)=7:RESTURE 1418:FÜR I=8 TO 27:REAb J:VPÜKE SHZB88 
+1,J: NEXT 

1318 FÜR I=8 TO 4:REHb DPCI»:NEXT. RETURN 

1326 WIDTH28:PRINT"AL ITEN ATI AIESIE* 

1338 PRINT" ----------------- -- - --- “ 

1346 LÜUCHTE 8,3:PRINT"bas nachfolyende Prouramm":FRINI"ıst eın reines MSX BASIC" 
RT aan und enhalt keine": PRINT"Maschınensprache Elemente," 

1358 FRINT:PRINT"Der Bildschirm wird gleich":PRINT*"fur einige Sekunden schwarz.b 
ıes hat jedoch keine": PRINT"Bedeutung,. " 

1366 RETURN 

1378 DATR ddperddddddddpr , ddddddlndadtdddIndaddaddddindddddd, dddaddmodddddddmoddddrd 
ddmodddddd, dhidddddddhiddaadddhidddddddaddh id, dikdddddddikddddddikdddddddddı ki 
1386 DATA dddderddddddadd, dddderddaddalnddddddddlnderdddddd, dddddddddddmodddddddchm 
oddddddddd, ddaddddanyaddddddhyddddddansdddddd, ddddddı kdddddddi kdddddddı kddddedcd 
1398 DATR derdddddderddd, derddlndddddadInddddddadInddderd, dddddmsdddddddmoddaddded 
ddmodddddd, daddddddadhudddddddddhyddddidddd , ddddddddddi kKAddddddddıı kAdcddcdcdcdcd 
14886 bAaTA dddddderdadddd, ddalnddderdinddaddalnddadderddlindd, ddmoddddddmoddddddmedd 
ddaddddmodd, dddddhyddadddadahj)ddaddddddnydddddd,, dddddı kKdddddtddı kKkddddddcddi kAddddcdcd 
1418 DATH 252,252,8,8,8.0,241,241.31,31,31,31.225,94,94,161.165,165,165,165,165, 
165,165,165,165,165,165,165 

14268 bDHrIn 12,16,20,24,28 

1436 REM SPRITES 

1446 DATA 880882050688C4H2b1, AHHTABHBAUABCHSH, 6HHHKHSELSZFEHATHE, AFELSLBZLSBZZZFZUZF , BU 
BOLFZUTFSOHBIF,4B3FHMBBHBAFFHBFF,, BuUAHFFÖAFFÜUHBBHFS, B4E21Z2BHACFI32E7 

1458 DATA 80886C62698492612,8914264990204489,98093C439920483#, Bu8040209043241E, [527] 
3F4BFFABABHBAGB, BFSAFFABRBERHCHSEH, AHELBESHSASASASAS, HSASASASASASCEST 

1468 DAHTR BUHB2UHUHRHCHABEKEUR, BABAUHURBACABCHE, HHAHABHBHKHHLF287TF ,SOTF4H7F5SB5F6HTF ,88 
BBBBBB8HE163A4,HTASCSSSBSES4634, HEWHHHHHMHTSSAHF 2, DRABAARUABABAACHE 

1476 DATA BU3F4BFFHOHBABAB, BFSÖFFHÄARBAKACHEG, BHEAKAHAHUHSAHAF , ABAUAARBABABCHEN, Hu 
2B6HRÖRHUFEB4FF,HBABABABRBRECHENR, BBW4BCL414TFSÄFF.,1414141414141810 


7185 CPU 23 


CPU-Game 


1488 DATA BBARHBHHBHCFIASF,BABFLÄ3SF282F3H3F , BHUHOBHHMBEZE4HF, HAHRAHHARAHBCCHF, 8 


1568 DHTH 41221103255238E91,3E5224558n442310,044810R04534E212,E234455442442810, 61 
81116925523351,830C5224552n542880,06006102C48942214,62944354R8542808 
1518 DATA B18RA1LAA15228911,09550E5522140380,0030092050582818,2054Eu54885H200M, 01 
61115325523351,865224552#542809,0800182C48942214.5294485448542300 
1528 DATA BB81C2A590669552H,1708002942RA542608,BHAC1A34589L6RAAD4,58BB4n2054cAB4unu, u 
B1B22251E9146B, H6H81LU2846A1L82386, 208045 445HR1T7R350, EH3644 205085 14uM 
1536 DATH VAH19282013955AHR,uHTO1R2150804HHBH, AUCHAB4USULCHRDS, swahauns neun, ne 
a1822251E9140B,866162840HA102308.9068048445A17RA359,E903044260508081468 
1546 DATA 3841261918252249,5522241918264134,01826413952444 HR, 9d44H41398648 UL, vu 
82231913%52223,342284191823098%,4844C4139820442C,1444RAB1393C408H%8 


88231918052228,34220419132386660,08806C4159820442C,1444HM1999C400UU 

1566 DATH BH1AcH5HH15Z2AS542A,1123453A11201003,8640H85HAS542HR54,5514H25188504051M, 01 
52850A142A5128,142A452A1188100%, 3840R05028548414.2354A25483100888 

1578 DATA B192046A1123542H,152H152RA15080008, 8A4H260508E 14254, Hö5dnssd4daslanumm, ol 
B268568HR142A5123.142H452H115H81088,8040A85A28545A14.,2554H25458100300 

1585 DATA 6982946928142201,2214230904%420000, 864426 1u24234488,44239410204RBuud, 10 
03889869146261,#214098803088868B8, Ku1n1h3uolnzu4h86, d4du2518y9Ku1B1AamHd 

1596 DAHTH BU10205009044201,32646950201U0Hu0H, HunsMdSsnlu204830, 4u2uıLasangasannn, au 
0808808991408201,08214090808650009,40810129810284688,402819901A180008 

1688 DATA BF192743I3A4AIAA, AHAKAIA4II4EZ2TLIBOF,FO88E412C9259555,559525C9I12E408F0, 00 
80887081324292A,2R29241308070089,8088E818C3249454,549424C81BEAH8H8 

1618 DATA 880000009 304098A, HA6984930098HH08, BHuHAH0HACa2u9050,509H2uCHaaBHanunn, nu 
880600800808102,02810890H90Hu0H HH, KHHuHKHaAnunuh504h, 4uaaahnuaananunn 

1628 DATA 18686458111113144,ABC5SZBCSABL4CISE, HHRABHBZSHEHAICA2, C9IASILZBDIA5I369,19 
608441184112144,AB442A48ARH4C9BE, B8A4AA2238HH1CA2, 493A3182951A512R0 

1638 DATA 8860441190110844 , öbBH42AUHHAAB4Fy4, HHS4AHKHZABHALAA2,88A21849598251208, 0% 
B8u8811HH8HA9U44, H0HHAAHHHHZHHH HAB, HHranuHaHuanLAann, Husz2unna4uu41unu 

1648 DATA BB3F4AFFABABRBBF , SaFFABORBAUBFCHAFF , BOFA28CHRKMARBHaF&8, 360D85u5050D860CH, a6 
aF4OFFABRBRUBF , S6FFABABABRBCHSA, ABFBOSWbE585850 18, 5uLu5u505u 5a 

1658 DATA BH295033C4H2BAAR, ATABAAARHAHAKHCHEN, HHAB1B2868A868AB, 2328232828283028,00 
3F4BFFABARARHFF , 31FERBABAHEFCHFF, AaFd2uU.H8HBBH050, BRABBRBRBAFD20CH 

1668 DATA BOSF4ERFFAÖRARBRG, HOHÖHBRKABBFCHOFF,68F 0360654505056, 5058505050D96ACu, 08 
208503%838484424,22111108A8RA548487,00038142424484894, 9620204048808054 

1678 DATA BOSF4AFFRBRBABFF, BiFERURBHRUBFLUFF ,BBFREBLBRKHMOBER, Aannahmamarazach, un 
3F4ÖFFAUABRUBF , BBFFABA4HEHRLÜBSH, BO. KHBLUBBSBSUER, CHcadh80402018Ru40 

1688 DHTA B6HHH0H1A3A605R5, A2u1LHuHBHBHHHHHH, HHHHAHSHCHEBEBELU, CAsSunnKmaAnABnHnnn 
169A RESTORE 144% 

1786 FOR I=8 TO 195:RERAb ©$ FÜR K=8 TO 7 VPÜKE 8KI+FKtFEHSSBR, VALC"EHM"+MIbSCCH, CA 
K+1,233:NEXT K,I:RETURN 

1718 REM CHARHKTER 

1728 DATA BHBHBUHHBHBBHRRRB, VH3U53A4H4553008,B6BLASBRBSB5SBDEB, BUEFZSEFZIELEFER,S8 


1738 DATA BH8SB4B9ESESHIERB, HBBH404F 55685F508, BonuunTaTB42Tndßb, bubnansäannannnnn, vu 
uauBBHHHBHKHBHHHB. 3828242428 2BEBCH, 32124302424E41DC13,165438EE 38541000 


1766 DATH WV1324242424130H,H0193u1lA1LBLOS3SHB, Hu1824u4A8103CHn,Buls240804241l5uM, 00 


1758 IHTR vuHBBKBBBsurarFTFsMOBTSFEHFFFRERKEFFF ,SFEFRRRF REF FFFFFF,FGFFFFFFFFFFFFF FR u 
EBFÜHFFFFEFRFHFF. BUBBHBBULHFÖFCFE , BumsuuFLFSFTFTF,ÄÜMCBEBFÖFEFLUFEFRE 
1728 EHTH MOUHWCÄOCHEBERFÜFG,FSFSFÜFCFCFEFEFE.FEFEFFEFFFFERFFFF.FFFEFFFFFFFFFFEFE,FE 


1885 DHTA TFEEFRFOSKERABBBH ,FFFFFHR FF F SF BG, EFF FF FH FFEFFFRF SF, FFFFFFFFFFFFFFFG.FF 


FEFFEFFFFCERHAA ,FEFCFOCHHHHHBBAH, 38534538505 H zu hl, BEBRERRSASPERSHN 
1819 DATA HBBHLA3A3HTETAFHrF ,1iFAFSHSFSFTVETETFE,TFETFRERERFRFFFFFFERF ,FFFFFEFFFFFRF FÜR ÜUF TR 


CPU 24 7185 


CPU-Game 


TFTFSFSFSFIHIF,ÄBFUFOTOETHSUSBLAB, ZuSsussudunshuhhnn, HhuHdRHhauhanrsun 
1326 DAuln GUWWBBHKMUFEFFFFFRF  HOUWABHMABFFFFFF ,HERBUHHBBHÄHAFFFF , nuaBRnKnBHAnmABAUFF, FF 
FFFFFFFFFFFFFFJBHFFFFFFEFFFFFFF BBÜBFFFFFFFFFFRFF , BaBBHArF FFFFEFFFF 
1838 DHTIH ÜUUUH3BHESBEESSch, S3>cbiS4knbbHEBEHbA, HHMBHLHTBOLCT4CCB4,6CEB46EBZS6BESLHB, HH 
PABUMHBSUCHBOHHN, AH1L234252H198 780, YonvondasbehHnnnad, BEIBSSISHBSHCHRHH 
1848 DbATn BAlB2u5sHbanubaTou, Vunuuunuhhuuunnd, ERW SHMDASWEHHNM, vuuHnMaeneaaae, kr 
FEFRFEFEFFFFFFHF HF , VUH4HB4BHBHL HEHE. Huud4snahhgduluun, BEhnWRBWZnneagan 
1556 DHIH Buivims4rcTC540U, BHHW LW3EL1HRBHHHH , HanBdnanaguniannn, LS2HZA4ALAZALEMM, 20 


1369 DATH BFIFSUHH4SUTSLIY, 3ESIELSWLBOLHTHI,CHFÜELBACCHEIFZBS. 33EBCHUKMCLBFAUER, HB 
BBABFIFSBEWC5CH,CELECTHELSKICHFUS, W330. 86L35333B 3, ES3FELZCEHCLSFHER 


1878 DHiA BHT7UF 1330606 3CT7CC,CbCCCTBH33BHL SH HS, LWEHSMLZBLSCCG4U, 3383LEICZWSÄOLFEFM,UT 
BF1SSUB34TÜLUuD,CLECCECZEH 13H 1CHE , SCHUF HSSHLSOEL SE 30H, KH 3LCZHRÄCFBFWH HH 
1839 DHTH BELIC3UBLCESCHCCEL,CbCC4TE33HLEHFUT ,VHHMFAFBBCHECHEZF,SEFEFCHBEACITBFACH , DB 
470C61536313332,138CC74368361LFÖF .EAFÜLSBCHOLBHE3SS, B33S3ESLEHLLSFECH 
1394 DHIHR B3UF-1CSMBR1CILCEnD,LECS36HFULFÜFABMHA, EBFBLSBCGLKBEL233B3, E33 36 A FEBRAC ISO, 03 


BFIBSBEICTECED, CU T6IOH3OLSHFAT,FUF SACHS LZEZELIS. JUCCSBCHE 
1966 DHIA BHunusnuunnheiunL,Hsusneonhuun ni, VUUUHHauuTLIFTSEW,SUHFLF3BS1E JR, HR, CC, St 


BFRBSBCHFESFUÖL,BHALFUFEBCERUEHEHTD., ÜHEUFUBLSLLÄLHL ER Col AL IR In In An 36 
1915 IHTHR WLBCHUHRHEMIH SH. HLEHHUHBRRMHRHER . CCCER3HLFBFCHFEI, BACHFSTFOTAHRBHD. 3% 
1SFBE1U71EFSEB, HUH3BFFCFHBMASMH, HR ICSUTBEIEBRÄL IC, FOL WU RM 
17£4 bDHIR VuuWHundnmuuaunual,HTUEHCALHCLSLSLS., vHRnuHauM TIEF TSEH, SSMF 3CERBE LER 3CHCT, Au 


ve 


fi 
BABUMGEHFELFBIL,BIEWTBEICHRCHRE JR, KURnBE EHRE, BHcuLdehenin 
1936 EHTH 135131818 0CHCH606,H3050 Lulu 
ErsSour.khstöul,uVFFFSBHHMKHHLFFF be 12) 
1346 DHain VUBHuBHunHnHABSOF, ISC3BHH5LHLLICHLH, HORBKHHAFSFFALARH,ATLFTSEBOSTAFLSEL, 08 
BRRHEBFEIFB3KL,CLFBISCHLB6CH533F3, HAHHHHBHHHUHMHSE , SEM CHL UHR MEN SM EMS 
1358 DHTHR LCHCECECHLEh3cyn 3, 6LIBSHZJEL EN HT KU, 56 EOHn 36H LZBLFÄF SM, SAH SC TFOÖSULUHFMFG, 
BRÜBHBCBLFEFBHWL1,BTLEFSEBBHBHHAHHH, 5u3n sun Hohn, Bunahanaaann 
13968 DRHIH BOBLOFIESEEBRUEL,CICELBCHEEESULLL . U FFFSWUHMALFFFEG, Sud 
FULFBSBLSLIEWI/S, 1301. BL C06H 3333635, MMWHMEMHSHEHL HUN, BD BR ÄSMSMLSLSLSL 
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BICBSBUCSCFOL1,BT1EFSEWMUUKBHUHM , LS1S LE SU SU Sn UL, EM HM URHBHE EHER 
198% RESTURE 1728 

1396 FuUR I=IR TO lIE:RERb v$:FÜR K=8 Tu T:VPÜUKE SKI+K+ÜHES3UUR, VALC"SHA"T+MIDSCCH, £% 
K+t1,Z>33:NEXT K,L:REIURN 

2euu6 INTERVHL UFF:STRISK«JY> UFF:SUUND 3,4: 5DUND 4,0. 50UND 16, 

e81lb EHSEiS)=üHlEWU. BHRSEL TV) =0 

<&WEU SGHREENW:CULUR 15,4,4 RETURN 

2036 bUSUB ZUBu: END 

2eB4b LUSUB ZU88:PRINT"Fehler in Zeile ";ERL 

28568 ERRÜR ERR 

2466 END 


Tips und Tricks 


CPC-464: 
Reverse On/Off 


Leider gibt es beim CPC kei- | möchte, kann folgende Sy- 
nen Befehl, der auf den „Re- | stemroutine aufrufen! Su 
verse-Modus“  umschaltet. Br 
Wer nicht die umständliche  CALL &BB9C:rem Ver- ” 
Methode der Paper/Pen-Aus- | tauscht Paper und Pen Farbe 
wechslung vornehmen 


CPU-User 


BTX setzt sich durch 


Seit Mai/Juni 1984 bietet die 
Post den uneingeschränkten 
bundesweiten Bildschirmtext 
an. Jeder Bundesbürger kann 
sich seit diesem Zeitpunkt an 
dieses Datennetz anschließen 
lassen. 

Der folgende Artikel soll dıe 
Möglichkeiten und Kosten 
für den Teilnehmer aufzeı- 
gen. 


Was verbirgt sich hinter dem 
Begriff Bildschirmtext? 

Bildschirmtext ist ein neuer 
Fernmeldedienst der Deut- 
schen Bundespost. Neben alt- 
bekannten Kommunika- 
tionstechniken wıe Telefon 


| Bildschirmtext-Seiten 


und Telex und neueren wie | 


Telefax und Teletex bietet dıe 
Post seit 1984 den Bild- 
schirmtext-Dienst an. 

Durch die Koppelung von 
Fernsehgerät und Telefon so- 


oder Institutionen angewählt 
werden. Durch diesen „Rech- 
nerverbund“ werden die Dıa- 
logmöglichkeiten nahezu un- 
begrenzt erweitert. BTX lıe- 
fert Textinformationen und 
Grafiken in vielen Farben auf 
den Bildschirm eines Fern- 
sehapparates. Man besitzt die 
Möglichkeit aus inzwischen 
mehreren Hunderttausend 
eine 
Auswahl zu treffen. Zum Beı- 
spiel können Sıe den neuesten 
Wetterbericht oder aktuelle 
Reiseangebote abrufen. Und 
da BTX auch dialogfähig ıst, 
können Sie auch Überwei- 
sungen von Ihrem Bankkonto 
veranlassen, oder eıne Bestel- 
lung bei Ihrem Versandhaus 


| aufgeben. 


wie der Verbindung zu cınem | 


Computer werden der Emp- 
fang und das Senden von In- 
formationen über die Tele- 
fonleitung möglich. Über die 
Kommunikation mit den 
BTX-Zentralen (Computern) 
der Post hinaus, können auch 
EDV-Anlagen von Unter- 
nehmen, Organisationen 


Aufbau des BTX-Systems 
Die Deutsche Bundespost 
stellt das Telefonnetz, das 
BTX-System sowie die Ver- 
mittlungsstellen zur Verfü- 
gung. Die Informationen 
werden von über 3000 Anbie- 
tern in das BTX-System cın- 
gegeben und in den BTX- 
Vermittlungsstellen der Post 
gespeichert. 
Datenverarbeitungsanlagen 


und Rechenzentren der ver- 
| schiedensten Anbieter (z. B. 


| Banken, Versicherungen, 
| Versandhäuser, Reiseunter- 
nehmen, Verlage) werden 


| über das Datex-Netz der Post 
mit den BTX-Vermittlungs- 
| stellen verbunden. 

| BTX wurde erstmals im Sep- 
tember 1983 zur internatio- 
nalen Funkausstellung einge- 
führt: wobei mit dem CEPT- 
Standard ein noch größerer 
Vorrat an Zeichen und Far- 
| ben sowie eine verfeinerte 
| Wiedergabe grafischer Dar- 
| stellungen durch höhere Bild- 
auflösung ermöglicht wurde. 
Seit dem Sommer 1984 ıst 
| eine neue Systemtechnik im 
Einsatz, die dıe technische 
Basis für den weiteren Aus- 
bau des BTX-Dienstes bildet. 


BTX für jedermann? 

Nach mehrjähriger öffentli- 
cher Erprobung ist deutlich 
geworden, daß BTX als neues 
Informationsmedium und 
insbesondere als neuer Kom- 
munikationsweg für die Vor- 
bereitung und Erledigung pri- 
vater Geschäfte und allge- 
meiner Informationsbedürf- 
nisse von der überwiegenden 


Mehrheit der privaten 
Teilnehmer akzeptiert wird. 
Zur Zeit sind etwa 20 000 pri- 
vate Teilnehmer an diesem 
System angeschlossen. Diese 
Zahl dürfte sich in den kom- 
menden Monaten und Jahren 
noch um ein vielfaches stei- 
gern, da inzwischen die Ko- 
sten für das Betreiben eines 
BTX-Decoders sehr günstig 
sind. Immer mehr Modem- 
Freaks steigen auf BTX um, 
da die Möglichkeiten weitaus 
größer und die Telefonkosten 
wesentlich niedriger sınd, als 
die Verbindung mit fernen 
Mailboxen. 

BTX bietet sich dem privaten 
Nutzer geradezu an, da er seı- 
ne Aktivitäten bequem vom 
Wohnzimmer aus tätıgen 
kann. Durch die 24stündige 
Verfügbarkeit ist er weder an 
Ladenschluß- noch an andere 
Öffnungszeiten gebunden. 
Folgende BTX-Möglichkei- 
ten werden in erster Linie von 
privaten Nutzern in An- 
spruch genommen: 


l. Angebote von Waren und 
Dienstleistungen aus allen 
Wirtschaftsbereichen 

2. Aktuelle Nachrichten 


Verbindungsschema und Aufbau des Mediums »Bildschirmtext« 


Btx-Zentrale 


Btx-Anschlußbox 
»DBT 03« 


Cassetten- 
recorder 


ele®o 


a8: 


Rildschirmtext 


»Btx-Decoder 1« 


»Stereo-Farbfernsehgerät« 


N 


IR-Fernbedienung 


CPU 26 


7/85 


CPU-User 


(Presse) und aktuelle Infor- | arbeitet. Für den Dialog mit | lichkeit diese mit einem Be- | Solange Sie Bildschirmtext 
mationen mit Servicecha- | dem BTX-System benutzen | trag von 0,00 DM bis 9,99 | benutzen, ist Ihr Telefonan- 
rakter Sıe entweder die Fernbedie- | DM zu belegen. Dieser Preis | schluß .besetzt“. Möchten 
3. Interaktive Dienste, insbe- | nung Ihres Fernsehers oder | muß jedoch in einer vorher- | Sie trotzdem telefonisch er- 
sondere Waren- und Infor- | die BTX-Tastatur des Deco- | gehenden Seite angekündigt | reichbar sein oder gleichzeitig 


matıonsbestellungen ders. Damit lassen sich Bu- | werden, so daß der BTX- | telefonieren. so benötigen Sie 

4. Kommunikation von | chungen und Bestellungen | Teilnehmer die Wahl besitzt. | einen Doppelanschluß. 
BTX-Teilnehmern unter- | durchführen. Aufjeder BTX- | diese Seite aufzurufen oderzu | Die abgerufenen BTX-Seiten 
einander. Seite finden Sie einen Hin- | überspringen. Wird eine sol- | lassen sich mit einem ge- 

weis mit welchen Tasten Sie | che Seite angewählt, so wird | wöhnlichen Kassettenrecor- 

Wie funktioniert BTX? die nächste Seite abrufen | der entsprechende Betrag mit | der oder seit neuestem auch 

Der private BTX-Teilnehmer | können. Der Anbieter von | Ihrer Telefonrechnung einge- | mit einer Diskettenstation 

braucht nicht viel: Einen | BTX-Seiten besitzt die Mög- | zogen. abspeichern. Die so gespei- 

Farbfernseher mit BTX-De- 

coder und Fernbedienung, Beispiele für Anwendungen 

ein Telefon und eine BTX- 

Anschlußbox (Modem). Anwendungen Mögl. Informationsanbieter 

Zu beachten ist, daß BTX- (Beispiele) (Auswahl) 

Decoder nicht an alle Fernse- 

her angeschlossen werden # Politische Nachrichten Tageszeitungen, Presseagenturen 

können, man sollte sich des- # Wetterbericht/Reisewetterbericht Deutscher Wetterdienst 

halb vor dem Kauf mit dem ff Sport Tageszeitungen, Sportzeitungen 

Händler absprechen. BTX- f Lotto/Toto Tageszeitungen, Klassenlotterien 

Pac gibt es Ber a Urlaubsreisen/Zimmernachweis Reiseveranstalter, Reisebüros, Hotels 

der Freislage re: Si Fahrplanauskunft DB, Verkehrs- und Fluggesellschaften 

und 2000 DM. Sicherlich ist ; > 

auch hier in nächster Zeit ein $ ['heater- und Konzertprogramme Veranstalter, Kommunen 

Preisrückgang zu erwarten. Lokaler Veranstaltungskalender TZ, Vereine, Kommunen, Parteien 

Der BTX-Decoder speichert # Bestseller/Neuveröffentlichungen Verlage, Buchclubs 

die empfangenen Textinfor- # Verkaufsangebote Kaufhäuser, Versandhandel, 

mationen und wandelt sie in Cash & Carry 

stehende Fernsehbilder, soge- # Immobilien Makler 

nannte Bildschirmtext-„Sei- f Stellenangebote Arbeitsämter, Firmen 

ten“, um. Die BTX-Ab- Bestellungen Versandhandel, Buchclubs, 

schlußbox verbindet den Theaterkassen 

BTX-Decoder mit dem Tele- Boch RT N a 

fonsnsrhhuß.. Die Übenmitt- uchungen Reiseveranstalter, Reisebüros 

lungsgeschwindigkeit für Überweisungen Banken, Sparkassen, Postgiroämter 

BTX-Seiten beträgt 1200 bir | Schadensmeldungen Versicherungen 

pro Sekunde (1200 Baud), # Finanzierung Bausparkassen, Banken 

also 4 mal so schnell wie eine # Steuererklärung Steuerberater, Finanzamt 

übliche Mailbox. Die Über- | Aus- und Weiterbildung Fachverlage, Fernlehrinstitute 

tragung von eigenen Seitenan ff Tests Psychologische Institute 

die BTX-Zentrale läuft dage- ff Spiele Unternehmen der Unterhaltungsbranche 


gen wesentlich langsamer ab, 
hier wird aus Sicherheits- 
gründen nur mıt 75 Baud ge- 


Fortsetzung S. 28 


Jetzt überall 
im 
Zeitschriften- 
handel: 


Das Softwaremagazin 


für Heimcomputer 


er CPU 27 


CPU-User 


cherten Seiten können jeder- 
zeit auf Ihren Bildschirm ge- 
bracht werden, ohne das Ge- 
bühren dafür entrichtet wer- 
den müssen. Wie auch bei 
den Heimcomputern 
sich auch ein Drucker an- 
schließen, der 
ausgeben kann. 


Ein besonders interessanter 
Dienst sind die „Persönlichen 
Mitteilungen“. Dieser Dienst 
ist ähnlich aufgebaut. wie bei 
den „Mailbox-Briefkästen“, 
die immer mehr Freunde fin- 


läßt | 


BTX-Zeiten | 


An alle BTX-Teilnehmer 
Die CPU beabsichtigt auch 
weiterhin von BTX zu berich- 
ten. Haben Sie Erfahrung mit 
BTX so können Sie mit einem 
Artikel zum Inhalt der CPU 
beitragen. Das Honorar be- 
trägt 120 DM pro abgedruck- 
te Seite. 


Ihre Beiträge! 


Wir erwarten gespannt auf 


| den. 


BTX 
einen 


Beı 
Teilnehmer 
elektronischen 
Nach dem Beginn eines Dia- 
logs finden Sie auf der Begrü- 
Bungsseite einen Hinweis, ob 
für Sie eine Mitteilung vor- 
liegt. Für Ihre eigene Mittei- 
lung an einen anderen BTX- 
Teilnehmer gibt es zweı Mög- 
lichkeiten: 


hat jeder 
eigenen 


1. Möglichkeit 

Anwählen einer Art „Formu- 
lar“, welches Sie mit Zahlen- 
angaben für Bestellungen, 


Datum u. a. ergänzen kön- 


| nen. 


Briefkasten. | 


2. Möglichkeit 

Aufrufen einer Leerseite, ın 
die mit einer BTX-Tastatur 
beliebiger Text eingegeben 


| werden kann. Bestimmen des 
| Empfängers durch Eingabe 


seiner BTX-Teilnehmernum- 
mer. 


Was kostet Bildschirmtext? 
Trotz umfangreicher Werbe- 


| Aktionen der Post sınd die 


eigentlichen Kosten nur sehr 


wenigen bekannt. Der Vor- 
wurf BTX seı für den priva- 
ten Gebrauch zu teuer, wird 
jedoch zu Unrecht erhoben. 

Der Preis für Fernsehgerät 
mit BTX-Decoder liegt etwa 
800-1500 DM über dem eines 
einfachen Fernsehempfän- 
gers. Wie schon erwähnt wird 
dies in den nächsten Monaten 
sicher noch günstiger werden. 
Für die Leistungen im BTX- 


| Dienst erhebt die Post folgen- 


de Gebühren: 


Gebühren für Btx-Teilnehmer 


—- Anschließungs- oder Änderungsgebühr 
— Monatliche Gebühr je Teilnehmerkennung 


— Telefongebühr 


—- Einrichten von Mitbenutzern 


— Absenden einer Mitteilung 
— Speichern einer abgerufenen Mitteilung 
—- Abruf aus anderen Regionalbereichen 


DM 65,00 
DM 8,00 


einmalig 


Orıs-/Nahgesprächsgebühr!') 


DM 0,05 pro Tag 

und Mitbenutzern?) 
DM 0,40 pro Seite?) 
DM 0.015 pro Tag u. Seite?) 
DM 0,02 pro Seite?)?) 


Btx - neue Applikation für den 
Texas Instruments Professional- 
Computer 


Der Btx-Software-Decoder des Dortmunder System- und Softwarehauses mbp erhält die FTZ-Zulassung auf einem Texas 
Instruments Professional-Computer 


Mit der Erteilung einer allge- 
meinen Zulassung für den 
vom Mathematischen Bera- 
tungs- und Programmier- 
dienst (mbp) entwickelten 
Software-Decoder auf dem 
PC von Texas Instruments 
durch das Zentralamt für Zu- 
lassungen im Fernmeldewe- 
sen wurde ein großer Fort- 
schritt für die Anwendung 
von PCs im Rahmen von 
Bildschirmtext erzielt. 

Zum erstenmal in ihrer über 
30jährigen Zulassungspraxis 
hat das Darmstädter FTZ mit 
der FTZ-Nummer 0 3841D 
einer Software ihren Segen 


gegeben. Der Btx-Software- | 


Decoder des Dortmunder Sy- 
stem- 
mbp hat die FTZ-Zulassung 
auf einem TI-PC. 

Die entscheidende Voraus- 
setzung. Bildschirmtext wirk- 
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und Softwarehauses | 


lich zum Kommunikations- 
medium der Zukunft zu ma- 
chen, besteht in der Möglich- 
keit, Btx voll in den vorhan- 
denen Informationskreislauf 
zu integrieren. Erst wenn der 
professionelle Anwender 
über ein Terminal nıcht nur 
seine üblichen PC-Applika- 
tionen, sondern auch seine 
Kommunikationsanforde- 
rungen vernünftig bearbeiten 
kann, lassen sich die Vorteile 
von Btx für ihn angemessen 
nutzen. 

Realisierbar wird diese Lö- 
sung durch einen Btx-Softwa- 


re-Decoder, wie der von mbp | 


entwickelte. Die zur Weıter- 
verarbeitung im Mikrocom- 
puter ohnehin erforderliche 
Decodierungs-Software wur- 
de durch einen Displayteil er- 
gänzt, so daß die Btx-Seiten 
aufdem am Rechner ohnehin 


| trieb 


vorhandenen Sichtgerät dar- 
gestellt werden können. 
Dabei werden die in den Btx- 
Seiten enthaltenen Nutzin- 
formationen den Benutzer- 
programmen, unabhängig 
vom verwendeten Btx-Stan- 
dard, für eine Weiterverar- 
beitung zur Verfügung ge- 
stellt. Das Prinzip der voll- 
ständigen Software-Integra- 
tion ermöglicht so dem An- 
wender eine gegenüber 
Hardware-Lösungen höhere 
Flexibilität in der Realısie- 
rung anforderungsgerechter 
Kommunikationskonzepte. 
Die Zulassung, die den Be- 
eines Professional- 
Computers als Teilnehmer- 
Terminal gestattet, sıeht fol- 
gende Konfiguration als Mi- 
nımum vor: 


| Texas Instruments (Portable) 


Professional-Computer 


- ein Floppy-Laufwerk 

— 256-KByte-Speicher 

— TI-Farbgrafik (3 Ebenen) 

- Kommunikationsmodul 
(zum Anschluß an 1200/75 
Modem) 

- VTX 84 RGB-Adapter 
(lieferbar 2. Quartal '85) 

- MS-DOS 2.11 

- mbp Btx-Software Rel. 1.5. 


Der Einsatz als Teilnehmer- 
Terminal gestattet es, die 
Bildschirmtext-Seiten auf 
dem Monitor des TI-PC dar- 
zustellen. Ein RGB-Monitor 
kann angeschlossen werden. 
Bix-Seiten können auf den 


| angeschlossenen Massenspei- 


chern (Floppy- oder Winche- 
ster-Disk) gespeichert und ım 
Off-line-Modus ohne Bild- 
schirmtext-Zentrale aufgeru- 
fen werden. 
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Zeicheneditor für ATARI 
(485k RAM) + Diskettenstation 


Der „ZEICHENEDITOR* ist 
ein Utility, das dem Anwen- 
der erlaubt, den Zeichensatz | 


alle Möglichkeiten anzeigt. 

Zur Auswahl der Funktionen 
ist der Anfangsbuchstabe der 
Funktion mit der Tastatur 


des ATARI umzugestalten 
und ıhn in seinen eigenen 
Programmen zu nutzen. 


einzugeben. 


Das Zeichen wird mit Hilfe | 


Der „ZEICHENEDITOR“ | 
meldet sich auf dem Bild- 
schirm mit einem Menue, das | 


des Joysticks editiert. 
Unter dem Menuepunkt 
„SAVEN“ findet man auch 


die Möglichkeit, den editier- 
ten Zeichensatz als eigenes 
Programm abzuspeichern. Es 
muß mit ENTER eingeladen 
werden. 

Die Funktion 
setzt einen Drucker voraus. 
Mit dieser Funktion ist es 
möglich, große Schriftbänder 
zu drucken. 


„BANNER“ | 


Beim Abtippen empfiehlt es 
sich, das Programm vorher 
abzuspeichern, da es mehrere 
Maschinenunterprogramme 
beinhaltet, die bei fehlerhaf- 
tem Abtippen zum Absturz 
führen können. 

Ein Drucker ist nur für die 
Funktion „BANNER“ erfor- 
derlich. 


m nn nn nr nn nn mn 


REM ZEICHENEDITOR 
REM er ee Gas Ka ar a a ae u 
REM Jens Scnufferer 
REM Denningerstr.706& 
REM 8000 Muenchen 81 
REM Tel.: 089/93 90 
REM 

REM 
REM 
150 FOKE 106,152 GRAFHICS 
DIH 
DIM Q(8,8),W(6) ,DIR$(Z0) 


89 
RK IK IKK IKK DK DK DK KICK. 


12 


30 ? 
40 ? 


E64 RROKKKAOKIOKIONKGAOIOKOKOKIONOK."" 
#5)'"%X zeicheneditor x" 
46 RR ROIWOIOOIKOIOIOOICIONOIOK! 
46:7 46 
#6,'"1985 
? #65:7 #6 
290 ? #5, "bitte wärtensseese 
45:7 #5, "LADE CHARACTERSATZ" 
#4; ''VCM rom INS ram" 
? 46:7 46:7 $64:? 485 
330 7? #65" NOMecomputer 
REM CHARKACTERMAF INS RAM 
FR E rn Er Bars Ka eu rn u un as au ah ar mus pe Kae 
CHEASNEU=156X2546 
CHEASOLD=FEERK (7IAH)K256 
GOSUE 4700:REM VEI 
GOSUE AFSOLA=SUSRCADRCCLEAÄFEL) ) 
GOSUE 4480 sA=USRCADRCTRÄANSE)) 
GOSUE GO30sA=USRCADRCCURSE),O,4) 
GOSUE 5400SREM DLI INTERRUFT 
GOSUE 5240%REM SFLII 
GOSUE 5150J)REM INVERS 
GOSUE 4570%REM DREHEN 
GOSUE 4850$REM SFIEGELN 
GOSUE 30:REM TITE 
REM DISFLAYLIST 
GRAFHICS 0 
FOKE 752,255°?REM CURSOR 
FOKE 709,18°FOKE 710,24 
DLT=38912ZIREM $5600 


JENS SCHUFFENER" 


vor 
(e Ew) 


730 
490 
500 
510 


en 
J<U 


530 


yon 


AUS 
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DIM INVERS4 (44) ,DREHEN$(81),SFIEGELN$ (54) ,X$(40) 


r$ (255), TRANS$ (42) ,CUFS$(75) ,INTER$ (20) , VEUS (BE) .CLEAR$ (31) .SFLIT$(117) 
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540 SCREENEASE=37952IREM $9440 

550 DATA 112,112 

560 DATA 82,00,05 

570 DATA 16 

580 DATA 66,64,148 

590.:DETA 24 24202,2r242,2413042 

600 DATA 144,2,2,2,2,16,4,16,5,16,6,16,7 

610 DATA 65,00,152,-1 

620 ZAEHLER=DLT?RESTORE 550 

630 READ DSIF D=-1 THEN 660 

640 FOKE ZAEHLER,DIZAEHLER=ZAEHLER+1 

650 GOTO 630 

660 FOKE 560 ,DLT-INT(DLT/256)x256 

670 FOKE 561,INT(DLT/Z56) 

680 FOKE 512,ADRCINTER$)-INTCADRCINTER$)/256)#256 
690 FOKE 513, INT(ADRCINTER$)/256) - 
700 FOKE 54766,192 

710 REM DISFLAY 


;20 REM ------- 

730’-7 

730 ? "Atari 1 OLDCHR" 
750 ? "Invert 2 LADEN" 
760 ? "Drehen 3 SAVEN" 
770 ? "Kopieren 4 EANNER'" 
780 ? "Loeschen S.DIR 
790 ? "Spiegeln" 

800 ? "Waenlen' 


810 ? "Editieren" 


830 FOR I=1 TO 8:FOSITION 14,1 
840 ? CHR$(150)5" "SCHR$(160) 
850 NEXT I 


870 REM FLAYER MISSLE 

880. /REML>F-TFFE7=-777 TTS 

870 FOKE 559,46:REM DMA EIN 

900 FOKE 53277 ,3+YREM DMA EIN 

910 FOKE 6#23,1:REM FRIOR 

920 FOKE 53257,3+REM SIZE Fi 

930 FOKE 705,1164:REM FARBE Fi 

940 FOKE 53258,34REM SIZE F2 

950 FOKE 706,223REM FARBE FZ 

940 FOKE 53256,0:REM SIZE FO 

970 FOKE 53249,108°REM Fl X-WERT 

980 FOKE 53250,108°REM F2 X-WERT 

990 FOKE 54279, 152: FMBEASE=152%256°REM FMEASE 
1000 FOEASE=FMEASE+S1Z 

1010 F1BASE=FMEASE+640 

1020 FZEASE=FMEASE+768 

1030 DATA 240,144,1944,240 

1040 RESTORE 1050 

1050 FOR I=1712 TO 1712+33READ D:FOKE I,D 
1060 NEXT I 

1070 REM MUSTER FM3 

1.080. 7KEM <= 

1090 FOR I=FZEASE+Z1 TO F2EASE+21+31 STEF 8 
1100 FOKE I,170:FOKE I+1,170 

1110 FOKE I+2,170:FOKE I+35,170 

1120 FOKE I+4,85:FOKE I+t5,85 

1130 FOKE I+6,865:FOKE I+t7,85 

1140 NEXT I 

1150 REM ALLE ZEICHEN 

LIA0SREM rer renenne 


820 FOSITION 14,0:3FOR I=1 TO 10%? CHR$(160);:NEXT I 


8640 FOSITION 14,9:FOR I=1 TO 10:5? CHR$&(160)5 NEXT I 
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6502/65C02 
Maschinen- 
sprache 


Autor: Christian Persson; 

erschienen im Heise-Verlag, 

Hannover - ISBN 3-922705 
-20-0 


Dieses Buch führt am Bei- 
spiel des elrad-COBOLD- 
Computers in die Program- 
mierung des weltweit erfolg- 
reichsten Mikroprozessors 
6502 ein. Der Leser benötigt 
keine Vorkenntnisse. Neben 
einem leicht verständlichen 
Grundkursus ist eine aus- 
führliche Beschreibung des 
COBOLD-Betriebssystems 
enthalten. Diese dient dem 
fortgeschrittenen Anwender 
als praxisnahe Anleitung für 
den Entwurf komplexer Pro- 
gramme. Die in sich abge- 
schlossenen Teile des Be- 
triebssystems und die ergän- 
zenden Programmbeispiele 
bilden zugleich eine wertvolle 
Sammlung von Standard- 
Routinen für jeden 6502-An- 
wender. 

Mit dem COBOLD-Compu- 
ter steht ein preisgünstiges 
Selbstbau-System als Trai- 
ningscomputer zur Verfü- 
gung. Der konkrete Bezug er- 
leichtert das Verständnis für 
das Zusammenwirken von 
Hardware und Software und 
ermöglicht es, die Darstellung 
auf andere Computer zu 
übertragen. 

Um das Programmieren 
„von der Pike auf“ zu lernen, 
gibt es kein dankbareres Stu- 
dienobjekt als den Mikropro- 
zessor 6502. Dessen Maschı- 
nensprache ist relativ leicht 
zu verstehen und zugleich be- 
sonders leistungsfähig. Rund 
die Hälfte aller Tischcompu- 
ter ist mit dem weltweit 
meistverkauften Miıkropro- 
zessor ausgestattet. Die neu- 
entwickelten CMOS-Versio- 
nen, deren Besonderheiten ın 
diesem Buch dargestellt wer- 
den, sichern dem Prozessor- 
typ auf Jahre hinaus cine 
Spitzenstellung in seiner 
Klasse. 
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170 ZAEHLER=38395%COUNT=0 
1180 FOR I=0 TO 127 

IF COUNT=32 
FOKE ZAEHLER,I 
ZAEHLER=ZAEHLER+1 


os 


1190 
1200 
1210 
122 
1230 
1240 
250 
1250 
1270 
1280 
1290 
1300 
1510 
1320 
1330 
1340 
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COUNT=COUNT+1 


NEXT I 
UE 38504REM CHR IN GRAFIKEN 
REM HAUFTSCHLEIFE 


GOS 


REM 


IF 
IF 
EF 
IF 
IF 
ER 
IF 
IF 
IF 
IF 
IF 
IF 
IF 


GOTO 
REM 
REM 


THEN COUNT=0 3 ZAEHLER=ZAEHLER+8 


A=31 
A=30 
Ah=26 
A=24 
A=29 
A=63 
A=58 
A=13 


GOSUE 14904G0T0 12703REM OLDCHR 
GOSUE 2890:G0T0 1270°REM LADEN 
GOSUE 2340:G0TO 1270:°REM SFEICHERN 
GOTO 30704REM EANNER 

GOTO ZI60:REM DIR 

GOSUE 1730%G60T0 1270°REM ATARI 
GOSUE 2040:G0T0 1270:REM DREHEN 
GOSUE 1800°G0T0 1270°REM INVERS 


=5 THEN GOSUE 1850%G0T0 12704REM KOFIEREN 
A=0 THEN GOSUE 1960:G60T0 1270:REM LOESCHEN 


A=62 
A=46 
A=42 


THEN 
THEN 
THEN 


1270 


WAEHLEN 


FOKE 764,255 
GOSUE A0504REM CUSOR WAEHLEN 

GOSUE 3750 +REM SICHTFELD LADEN 
GOSUE 38505REM CHAR IN GRAFIKEN 


RETURN 
REM OLDCHR 
REM ----- 


FOKE 764,255 
A=USRCADRCTRANSS) ) 

GOSUE 37504REM CHR INS FENSTER 
RETURN 
REM EDITIEREN 


RE.M 
FOKE 764 


GOSUE 2100%3G0T0 1270:REM SFIEGELN 
GOSUE 1420:3G0T0 1270:REM WAEHLEN 
GOSUE 1550°G0T0 1270:REM EDITIEREN 


mm 
’ Paste) 


WX=108:WY=21 
A=USRCADRCCURS$) ,WX,WY) 
A=STICK(0) 


IF 
IF 
IF 
IF 


FEEK(764)> 


255 THEN RETURN 


STRIG(0)=0 THEN GOSUE 1700:3G0TO 16860 
A=14 AND WY=Z1 THEN WY=WY-4%G0OT0O 1680 
A=13 AND WY:4A48 THEN WY=WY+43GOTO 1680 


IF A=11 AND WX:1086 THEN WX=WX-43G0OT0 1660 
IF A=7 AND WX:136 THEN WX=WX+4:GOTO 1680 
GOTO 1600 

A=USR(ADFRCCURSE$) ,WX,WY) 

GOTO 1600 


X=(WX-1085) 7/4: V=(WY-21)/4 

A=USR (ADF(SFLIT$),X,Y,CHRNR) 
RETURN 
REM ATARI 


REM 
FOKE 764 


BEE 
,299 


FOR I=0 TO 7 
FOKE CHEASNEU+CHRNRXBS+I,FEERKCCHEASOLD+CHRNRXS+I) 
NEXT I 
GOTO 1460 


Dieses Buch ist Program- 
mier-Lehrbuch, Programm- 
sammlung und Handbuch 
zum elrad-COBOLD-Com- 
puter in einem. Wer einen an- 
deren Computer benutzt, 
wird einige Angaben auf die- 
sen übertragen müssen - ein 
Nachteil, den jedes andere 
nicht systembezogene Lehr- 
buch auch aufweist. Anderer- 
seits bietet aber gerade der 
Bezug auf einen real vorhan- 
denen Computer und dessen 
Betriebssystem, das ın allen 
Einzelheiten erläutert wird, 
den Vorteil der Praxisnähe. 
Im Prinzip kann jeder 6502- 
Computer zum Einüben der 
beschriebenen Programmier- 
techniken dienen, wenn we- 
nigstens ein Maschinenspra- 
che-Monitor vorhanden ist. 
(Andernfalls können Sie den 
COBOLD-Monitor überneh- 
men; allerdings sind dafür 
schon einige Vorkenntnisse 
erforderlich.) 

Mit dem elrad-COBOLD- 
Computer steht ein preisgün- 
stiges Selbstbau-System zur 
Verfügung, das sich gleicher- 
maßen gut als Lerncomputer 
für den Anfänger wie als Ent- 
wicklungsystem oder Zentral- 
einheit eines Tischcomputers 
für den fortgeschrittenen Pro- 
grammierer eignet. So bietet 
der COBOLD-Computer 
schon in der Grundversion 
viele Möglichkeiten, die man 
bei einem Lerncomputer 
sonst nicht vorfindet. Der 
weitere Ausbau ist nicht nur 
möglich, sondern schon 
weitgehend vorbereitet, so 
daß nur noch geringe Kosten 
entstehen. 

Dieses Buch soll Lesern mit 
sehr unterschiedlichem Hin- 
tergrund gerecht werden. Es 
wendet sich an den Anfänger, 
der weder auf dem Gebiet der 
Computertechnik noch auf 
dem der Mathematik beson- 
dere Vorkenntnisse besitzt. 
Es richtet sich zugleich an den 
6502-Experten, der eine Do- 
kumentation des COBOLD- 
Systems benötigt, um dessen 
Möglichkeiten auszuschöp- 
fen beziehungsweise zu er- 
weitern. 
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nn 
1800 REM INVERS 2170: REM =--== 
1810 REM -------- 2180 FOKE 53248,0 
1820 FOKE 769,255 2190 FOKE 53249,0 
1830 A=USRCADRCINVERS$),CHRNR) 2200 FOKE 53250,0?REM XWERT FLO-2 
15640 GOTO 1460 2Z10 FOKE 764,255 
1850 REM KOFIEREN 2220 GRAFHICS 0 
1860) (REM. === 2230 TRAF 2280 
1870 FOKE 764,255 2240 OFEN #1,6,0,"D!x.x" 
1880 CHRNRZ=CHRNR 2250 INFUT #15X$:? xX$;" 2 
1890 GOSUE 4050%REM CURSOR WAEHLEN 22580 INFUT #15X$:? x$ 
1900 GOSUE 3750%REM CHR INS SICHTF. 2270 GOTO 2250 
1510 FOR I=0 TO 7 2280 CLOSE #1 
1920 FOKE CHEASNEU+CHRNR2XS+I,FEEK 2290 ? 3? "Taste druecken " 
(CHEASNEU+CHRNRXB8+I) 2300 IF FEEK(784)=255 THEN 2300 
1950 NEXT I 2310 FOKE 764,255 
1940 CHRNR=CHRNRZ 2320 Frz& 
1950 RETURN 2330 GOTO 480 
1960 REM LOESCHEN 2340 REM SFEICHERN 
1970 REM ---------- 2350 REM -=--------- 
1980 FOKE 764,255 2360 FOKE 764,255 
1990 FOR I=0 TO 7 2370 FOKE 54286,64°REM DLI AUS 
2000 FOKE CHEASNEU+CHRNRX8+I,0 2380 FOKE 53248,0:REM F0-2 XWERTE 
2010 NEXT I 2390 FOKE 53249,0 
2020 GOSUE 3750:?REM CHR INS SICHTF, 2400 FOKE 53250,0 
2030 RETURN 2410 FOSITION 15,33? "1) FRGR." 
2040 RE DREHEN 2420 FOSITION 15,4:? "2) DATA" 
2050.:REM.==*===== 2430 FOSITION 15,5? "3) FILE" 
2080 FOKE 764,255 2440 FOSITION 15,73? "4) QUIT" 
2070 A=USR(CADRCDREHEN$) ,CHRNR) 2450 A=FEEK (764) 
2080 GOSUE 3750%REM CHR INS SICHTF, 2460 IF A=31 THEN 2510 
2090 RETURN 2470 IF A=30 THEN 2740 
2100 REM SFIEGELN 2480 IF A=264 THEN 2810 
2110 REM ---------- 2470 IF A=24 THEN 2660 
2120 FOKE 764,255 2500 GOTO 2450 
2130 A=USR(ADR(SFIEGELN$),CHRNF) 2510 REM FRGR, 
2140 GOSUE 3750$REM SICHTFELD 2520 GOSUE 4190:REM DATEI EROEFFNEN 
2150 RETURN 2530 IF FEEK(851)X>1 THEN 2660 
2160 REM DIR 2540 GOSUE 44203REM ZEILENNUMMER 
_— 
2550 ? #15"0 GOSUE "SZEILE}"SREM AE HIER EIGENES FROGRAMM !" 
2550 ? #15 ZEILE5" REM UNTERFRG. CHARACTERMAF ERSTELLEN" 
2570 ? #15 ZEILE+15" FOKE1064,FEEK(106)-4:GR.0" 
2580 GOSUE 4300%REM DATA ZEILEN 
25790 ? #15 ZEILE+1405" RESTORE "}ZEILE 
2600 ? #1, ZEILE+1415" ZI=FEEK(106)x256" 
2610 ? #15 ZEILE+142;" FOR I = Z1 TO Z1+1023" 
2620 ? #15 ZEILE+143;5" READDSFOKEI,D" 
2630: 7 #1, ZEILERT44} "NEXT I" 
2640 ? #15 ZEILE+1455" POKE7S6,FEEK(106)" 
2650 ? #15 ZEILE+1455" RETURN" 
2660 CLOSE #1%FOKE 764,255 
2670 FOKE 54284,192}REM DLI AN 
2680 FOR I=3 TO 7 
2690. POSITION 15,137 " ei 
2700 NEXT I 
2710 FOKE 53249,108°REM Fi XWERT 
2720 FOKE 53250,108°REM FZ XWERT | 
2730 RETURN | 
2740 REM AESFEICHERN ALS DATA 
2750 GOSUE 4190°REM OEFFNE DATEI 
2760 IF FEEK(851):>1 THEN 2660 
2770 GOSUE 4420%REM ZEILENNUMMER 
CPU 32 7/85 


CPU-Utility 


? #15 ZEILE;" REM DATA FUER CHARACTER 
GOSUE 4300°REM DATAZEILEN GENERIEREN 


GOTO 2660 
REM FILE 
REM ------ 


GOSUE 4190°REM DATEI EROEFFNEN 
IF FEEK(851)%>1 THEN 2660 

FOR 1=39935 TO 39936+1023 

FUT #1,FEEK(CI) 


FOKE 764,255 

FOKE 54286,64:REM DLI OFF 
FOSITION 2,103? " 

FOSITION 2,103? "DSDATEINAME "; 
INFUT X$ 

TRAF 3020 

OFEN #1,4,0,%$ 

IF FEEK(851)<X>1 THEN 3020 

FOR I=CHEASNEU TO CHEASNEU+1023 
GET #1,A:FOKE I,A 

NEXT I 

CLOSE #1 

FOSITION 2,103? 

FOKE 54286,1923REM DLI AN 

GOSUE 37504REM CHR INS SICHTF. 


RETURN 
REM EANNER 
REM -------- 


FOKE 764,259 

FOKE 53248,0:REM XWERTE F(0-2) 
FOKE 53249,0 

FOKE 53250,0 

GRAFHICS 1 

2 #6," EANNERCREATOR 1 
FOKE 755,156:°REM CHEAS 
TRAF 3370 

CLOSE #150OFEN #1,8,0,"F3%" 
REM EINGAEEN 

? #6; "Geben sie den sätz 
? <INFUT X%$ 

? #6:? #6; "Welche groesse (1-8) " 
INFUT VERSIF VERZ1l OR VER:B8 

3210 

nhor.cH)" 


.. 


ein 3% 


z>"H" THEN 3230 


vert.(V) 
AND 
1.772)" 


? #64:? #64, "Ausdrucksss 
INFUT DIR$SIF DIRSIH"V" 
? #64:7 #64; "Linker rand 
INFUT RAND 

IF RAND:1 OR RAND:7Z THEN 3250 
? #5:? #64, "EITTE WARTEN" 

FOR S=1 TO LEN(X$) 
C=ASC(X$(5,5)) 

INV=0 

IF C>128 THEN C=C-128:YINV=1 
GOSUE 5460 REM ASCII-DISFLAYCD 
GOSUE 3390 REM CHR DATEN 

GOSUE 3520%REM DRUCKEN 


| 3360 


3370 
3380 
3370 
3400 
3410 
3420 
3430 
3440 
3450 
3460 
3470 
3480 
3450 


=1SWEILI)=WEIDI -24(7-J) 


3500 
3510 


II 


3530 
3540 
3550 
3560 
3570 
3580 
3590 
3600 
361.0 
3520 
3630 
3640 
3650 
3660 
3670 
3680 
3690 
3700 
3710 
3720 
3730 
3740 
3750 
3760 
3770 
3780 
3790 
3800 
3810 
3820 
3830 
3840 
3850 
3860 
3870 
3880 
3890 
3700 
3710 
392 

3930 
3940 


NEXT S 

FOKE 7694,255sCL0OSE #1 
GOTO 480 

REM EUCHSTAEEN DATEN 

REM CHEUCHSTAEE 

FOR I=0 TO 7 
WEII=FEERCCHEASNEU+CKB+I) 
NEXTI'T 

FOR I=0 TO 73FOR J=0 TO 7 
QCJ,I)=0 

NEXT JSNEXT I 

FOR I=0 TO 7 

FOR J=0 TO 7 

IF W(TI)>=24(7-J) THEN Q(J,D 


NEXT JSNEXT I 

RETURN 

REM EUCHSTAEE DRUCKEN 
REM men Dann ann maus Sonn min namen Sn ao mp aan. Bd a a en 
FOR I=0 TO 7 
ZAEHLER=RAND 
As(L)I=" "HA$(2SSI=" 
FOR J=0 T0 7 

IF DIR$="V" THEN Q=Q(J,I) 

IF DIR$="H" THEN Q=Q(I,7-J) 
IF Q=0 THEN 3660 

FOR Z=1 TO VER 

CHAR=42SIF INV=1 THEN CHAR=32 
At CZAEHLER) =CHR$ (CHAR) 
ZAEHLER=ZAEHLER+1SNEXT Z 

GOTO 3700 

FOR Z=1 TO VER 

CHAR=32$IF INV=1 THEN CHAR=42 
A$CZAEHLER) =CHR$ CHAR) 
ZAEHLER=ZAEHLER+1SNEXT Z 

NEXT J 

FOR Z=1 TO VER 

? As? #1, A$ 

NEXT ZENEXT I 

RETURN 

REM CHARACTER IN SICHTFELD 
REM 222er gerne 
Y=21 

FOR I=0 TO 7 
EYTE=FEEKCCHEASNEU+CHRNRXB+I) 
FOR J=1 TO 4 

FOKE FIEASE+Y,EYTE 

Y=Y+13NEXT J 

NEXT I 

A=USR CADRCCURS$),O,WY) 

RETURN 

REM CHARACTER IN GRAFIKEN 
REM un nn nn un ann nn 
C=CHRNRSGOSUE 5560 

FOSITION 26,8:?? "CHRESC"ICH") 
FOSITION 35,87 a, 1 7 7° 

FOKE 38308,CHRNR j 

FOR I=38357 TO 38382 STEF 5 
FOKE I,CHRNFSFOKE I+r1,CHRNR 
FOKE I+3,.CHRNR 


"ASCH)=EAF 
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3950 NEXT I 

3960 C1=CHRNRICZ=CHRNR+128 
3970 FOR I=38552 TO 38591 STEF 43FOKE I,C15FOKE I+3,C2:NEXT I 
3980 FOR I=38592 TO 38631 STEF 6°FOKE I,C15FOKE I+3,C2:NEXT I 
3990 IF C1:=64 THEN C1=03C2=C1:C3=C13C4=C1:G0OTO 4010 

4000 C2=C1+643C3=C1+128:C4=C1+192 

4010 FOR I=38632 TO 38672 STEF 12$FOKE I,C1:FOKE I+3,C2 

4020. FOKE I+6,C3}FOKE I+9,C4 

4030 NEXT I 

4040 RETURN 

4050 REM CURSOR WAEHL.EN 

40650, REM F2===77= 5 >sr- 

4070 WX=54:WY=62 

4080 A=USR(ADR(CURS$) ,WX,WY) 

4090 CHRNR=0 

4100 S=STICK(0) 

4110 IF STRIG(0)=0 THEN RETURN 

4120 IF 5=14 AND WY>42 THEN WY=WY-43CHRNR=CHRNR-323GOTO 4170 
4130 IF $S=13 AND WY<73 THEN WY=WY+4SCHRNR=CHRNR+323GOTO 4170 
4140 IF S=11 AND WX64 THEN WX=WX-43CHRNR=CHRNR-13GOTO 4170 
4150 IF S=7 AND WX:188 THEN WX=WX+4CHRNR=CHRNR+13GOTO 4170 


4160 GOTO 4100 

4170 A=USR(ADR(CCURS$) ,WX,WY) 

4180 GOTO 4100 

4190 REM DATEI EROEFFNEN 

AZOOFREM,FESS Seren 

4210 FOKE 764,255 

4220 POSITION 2,10:FOKE 764,255 
4230,72" ® 
4240 FOSITION 2,103? "DSDATEINAME er 
4250 INFUT X$ 

4260 TRAF 4280 

4270 OFEN #1,8,0,X$ 

4280 FOSITION 2,103? " 

4290 RETURN 

4300 REM DATA ZEILEN GENERIEREN 

431.0 REM ==> FH rer rn 


4330 FOR I=39934 TO 399356+1023 STEF 8 
4340 ? #13 ZEILE+A,) "DATA "5 

45350 FOR J=0 TO 7 

4360 ? #1; FEEKCI+J), 

4370 IF JX7 THEN ? #15","} 

4380 NEXT J 

4390 A=zA+1:? #1 

4400 NEXT I 

4410 RETURN 

4420 REM ZEILENNUMMER 

AA3SDSREM SS 

4440 FOSITION 2,103”? "WELCHE ANFANGSZEILE "5 
4450 INFUT ZEILE 

4460 FOSITION 2,10:?7 " 

4470 RETURN 

4480 REM MASCHINENFROGRAMM TRANS 


4500 DATA 104,169,0,133,203,133,205,169,156,133 
4510 DATA 206,173,244,2,133,204,177,203,145,205 
4520 DATA 230,203,208,2,230,204,230,205,208,8 

4530 DATA 230,206,165,206,201,160,240,3,56,176 


Ausgewählte 
BASIC-Computer- 
spiele für den 
Atari 800 


aus der Vieweg Programm- 
bibliothek -— Mikrocomputer 
13 - ISBN 3-528-04307-5 


Sämtliche Programme wur- 
den auf den Atari 800 ge- 
schrieben, sind jedoch so aus- 
gelegt, daß sie mit kleinen 
Änderungen auf jedem ande- 
ren BASIC-Computer ablau- 
fen können. Insbesondere 
verzichtete der Autor fast 
gänzlich auf die Verwendung 
von Strings, da die String- 
Verarbeitung bei den ver- 
schiedenen Computersyste- 
men stark variiert. Im An- 
hang findet man dazu eine 
kurze Beschreibung, der in 
diesem Buch verwendeten 
Befehle. 

Die überwiegende Mehrheit 
dieser Spiele zählt zur Kate- 
gorie der Strategiespiele. Die- 
se Programme besitzen eine 
relativ hohe Spielstärke, so 
daß der Computer den feh- 
lenden Partner völlig ersetzt. 
Zudem weisen die Spiele eine 
übersichtliche Struktur auf 
und sind ausführlich erläu- 
tert. 
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DATA 231,96, -1 

RESTORE 4500;G0OSUE 5640 
TRANS$=A$+RETURN 

REM MR DREHEN 


DATA 104,104,104,170,169,0,133,212,169,15% 
DATA 133,213,224,0,240,16,24,165,212,105 
DATA 8,133,212,165,213,105,0,133,213,202 
DATA 208,240,169,128,141,163,6,162,0,160 
DATA 7,177,212,45,163,6,240,7,56,62 

DATA 192,6,56,176,4,24,62,192,6,136 

DATA 16,235,78,163,6,232,224,8,208,225 
DATA 160,7,185,192,6,195,212,136,16,248 
DATA 96, -1 

RESTORE 4590:G0OSUE 5640 
DREHEN$=A$SRETURN 

REM VE!Y ROUTINE 


DATA 104,104,170,104,168,169,7,32,92,22 
DATA 96,216,206,168,6,208,22,169,22,141 
DATA 168,6,173,192,2,208,7,169,10,141 
DATA 192,2,208,5,169,0,141,192,2,173 
DATA 167,6,201,12,240,13,2068,167,6,173 
DATA 167,68,191,4,212,868,76,98,228,169 
DATA 15,1941,1687,68,191,94,212,173,166,6 
DATA 201,940,1949,5,169,0,141,166,6,141 
DATA 3,152,238,166,6,76,98,228,-1 
RESTORE 4720:G0OSUE 5640 

VEV$=A$ 

A=USR(ADR (VEV$) ,ADR(VEV$)+11) 

RETURN 

REM MR SFIEGELN 


DATA 1094,104,104,170,169,0,133,212,169,156 
DATA 133,213,224,0,240,168,24,1685,212,105 
DATA 8,133,212,165,213,105,0,133,213,202 
DATA 208,240,160,7,177,212,162,7,74,96 
DATA 1683,6,202,16,249,173,163,6,145, 212 
DATA 136,16,237,96,-1 

RESTORE 4870:G0SUE 5640 
SFIEGELN$=A$SRETURN 

REM MR CLEAR 


DATA 104,1689,0,133,203,169,152,133,204,160 
DATA 0,1689,0,145,203,230,203,208,8,230 
DATA 204,165,204,201,1680,2430,3,56,176,237 
DATA 96, -1 

RESTORE 4970:G0OSUE 5640 

CLEAR$=A$SRETURN 

REM DATA CURSOR 

REM Mid cine dät sone nida nähe ini’ anf m Dune au an 

DATA 1094,109,104,1941,1681,6,1094,104,141,162 
DATA 6,24,169,0,109,160,6,133,208,169 

DATA 154,105,0,133,209,160,0,169,0,195 
DATA 208,200,192,4,208,247,294,169,0,109 
DATA 162,68,133,208,169,1594,105,0,133,209 
DATA 160,0,185,1768,6,145,208,200,192,4 
DATA 208,246,173,161,6,141,0,208,173,162 
DATA 5,141,160,5,96,-1 

RESTORE 5050:G0SUE 5640 

CURS$=A$ RETURN 

REM INVERS MR 

REM #=-==2===>+7-> 

DATA 104,104,1094,170,169,0,133,212,1689,156 


Die Bände der Programmbi- 
bliothek erscheinen getrennt 
für programmierbare Ta- 
schenrechner und Mikro- 
computer und enthalten aus- 
getestete Programme zu je- 
weils einem ausgewählten 
Themenschwerpunkt, der in 
einem einführenden Beitrag 
vorgestellt wird, oder für ei- 
nen aktuellen Rechner. Dabei 
wird der jeweilige Entwick- 
lungsstand der Rechnertech- 
nik berücksichtigt. 

Die Programmbibliothek ıst 
mithin als Ergänzung der 
Programmsammlung im Mi- 
krocomputer-Jahrbuch anzu- 
sehen. 

Die Programme sind, ausge- 
hend von einer konkreten 
Aufgabenstellung, in der Re- 
gel in ihrem Ablauf beschrie- 
ben und durch ausgeführte 
Beispiele ergänzt. Wenn es 
nötig scheint, sind auch theo- 
retische Grundlagen für die 
Programmierung erläutert. 
Durch die graphischen, tabel- 
larıschen oder in Textform 
gegebenen Ablaufbeschrei- 
bungen wird die Übertrag- 
barkeit auf andere Rechner- 
typen erleichtert, so daß die 
wirtschaftliche Nutzung der 
einzelnen Bände möglich ist. 
An Hand gleichartiger Aufga- 
benstellungen wird fallweise 
auch die unterschiedliche Ar- 
beitsweise verschiedener 


“ 


Rechnertypen aufgezeigt. 


Du Ze Zur = 
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5180 DATA 133,213,224,0,240,16,24,165,212,105 
5190 DATA 8,133,212,145,213,105,0,133,213,202 
5200 DATA 208,240,160,7,177,212,73,255,195, 212 
5210 DATA 136,16,247,96,-1 

5220 RESTORE 5170:G0SUB 5640 

5230 INVERS$=A$}RETURN 

5240 SFLIT MR 

5250 

5260 104,104,1094,1941,169,6,104,104,141,170 
5270 6,104,104,141,173,6,169,21,191,171 
5280 6,169,128,141,172,6,172,170,6,240 
5290 12,24,173,171,6,105,4,141,171,6 

5300 136,208,244,174,169,6,240,6,78,172 
5310 6,202,208,250,172,171,6,162,4,185 
5320 128,154,77,172,6,153,128,154,200,202 
5330 208,243,169,0,133,212,169,156,133,213 
5340 174,173,6,240,16,24,165,212,105,8 " 
5350 133,212,165,213,105,0,133,213,202,208 
5360 240,172,170,6,177,212,77,172,6,1495 
5370 212,96, -1 

5380 RESTORE 5240:3G0SUB 5540 

53790 SFLIT$=A$SRETURN 

5400 REM DLI INTERRUFT 

5410 REM 

5420 DATA 72,138,72,169,156,162,15,191,10,212 
5430 DATA 141,9,212,142,23,208,104%,170,104,64, -1 
5440 RESTORE 5400?G0SUE 5640 

5450 INTER$=A$SRETURN 

5460 REM UMRECHNUNG ASCII-DISFLAY 

5470 REM 

5480 REM CSASCII IN 

5490 REM C!DISFLAY OUT 

5500 IF C<32 THEN C=C+643 RETURN 

5510 IF C<X9& THEN C=C-32:RETURN 

5520 IF C<128 THEN RETURN 

5530 IF C{160 THEN C=C+644°RETURN 

5540 IF C{224 THEN C=C-32:RETURN 

5550 RETURN } 

5560 REM UMRECHNUNG DISFLAY-ASCII 

5570 REM 

5580 IF C<64 THEN C=C+32YRETURN 

5590 IF CZX96 THEN C=C-54: RETURN 

5600 IF Ci128 THEN RETURN 

5610 IF Ci192 THEN C=C+323RETURN 

5620 IF C{224 THEN C=C-44:RETURN 

55430 RETURN 

5640 REM STRING ERZEUGEN 

5650 R 

5660 A$(1)=CHR$(0) A$C2SSI=CHRE(O) 

5670 A$(Z)=A$ 

5680 ZAEHLER=1 

56590 READ D:IF D=-1 THEN RETURN 

5700 A$(ZAEHLER)=CHR$(D) 

5710 FOKE 53279,0 

5720 ZAEHLER=ZAEHLER+1:?GOTO 5690 

5730 REM TITEL 

5740 REM E 
5750 FOKE 54276,15 

5760 A$=" ZEICHENEDITOR 1985 Homecomputer ZEICHENEDITOR 1985 Homecom 
puter a 

5770 ZAEHLER=153% 

5780 FOR I=1 TO LEN(A$) 5810 FOKE ZAEHLER,C?ZAEHLER=ZAEHLER+1 
5790 C=ASC(A$(I,I)) 5820 NEXT I 
5800 GOSUEB 5460 5830 RETURN 
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CPU-Test 


Wer ist der Schnellste im ganzen 
Land? 


CPU testete die Geschwindigkeit von 28 Home- und Personalcomputern 


In CPU 3/85 haben wir das | Name Benchmark I Benchmark II täuschungen zu zählen sind. 
Testergebnis unseres großen | n Auf der Hannover-Messe 
Benchmarktests mit 17 Rech- | fosack ie 4 er | hatten wir auch die Möglich- 
nern veröffentlicht. In der | Alphatronic PC 91,5 195 | keit, den Z9001 vom VEB 
Zwischenzeit haben wir eini- | Apple Il 8] 87 | Robotron aus der DDR zu 
ge neue Rechner getestet und Atari 600 18.4 171 testen. Das Ergebnis können 
können nun die Ergebnisse | Arari 800 XL 18.4 171 | Sıe der Tabelle entnehmen. 
von 28 Computern abdruk- | rar 130 XE 191 168 | Es ıst uns nicht bekannt, ob 
ken. Diesmal konnten wir | Casio FP-200 177 15.3 | dieser Homecomputer auf 
auch die neuen MSX-Rech- | Casio FP-1000 83 212 dem bundesdeutschen Markt 
ner sowie zwei weitere neue | CE.TEC MPC 80 MSX 21.9 180 vertrieben wird. 
Computer berücksichtigen. | Commodore C-16/116 79 93 | Leider konnte der 68000- 
Beı der Vorstellung des PC | Commodore VC20 77 80 | Rechner Atarı ST 520 noch 
128 und des Atarı 130 XE auf | Commoder c64 9] 97 nicht getestet werden, da auf 
der Hannover-Messe haben | Commodore PC128 98 115 | dem CEBIT-Stand des Her- 
wir diese brandneuen Rech- | Commodore Plus4 80 90 | stellers keine endgültige Ba- 
ner den Benchmark-Pro- Fujitsu FM 7 30 55 sic-Version vorgeführt wer- 
grammen unterworfen. Hier IBM PC 43 3 | den konnte. 
sind die Testprogramme und | [aser 310 83 112 | Zu den Benchmark-Tests all- 
die Ergebnisse: |"Laser 2001 53 65 gemein muß noch gesagt wer- 
Schneider CPC 464 47 65 ı den, daß die Ergebnisse nie- 
Sharp MZ 800 63 65 mals die realen Verhältnisse 
Sinclair Spectrum 17.6 19.0 fehlerfrei wiedergeben kön- 
Benchmark I: | Sony Hit-Bit MSX 224 178 nen. Die Ergebnisse einzelner 
10 FOR I=1 TO 100 | SVI 318/328 2 379 237 Rechner hängen unter ande- 
20 A=SQR (I) | SVI 728 MSX 319 18.0 rem auch von der Rechenge- 
30 A=SIN (I) TI 99/4A 368 311 | nauigkeit ab. So hat der 
40 A=1/I VZ 200 "78 90 Z9001 nur eine Genauigkeit 
50 NEXT I Z9001 (VEB Robotron) 56 100 von 6 Stellen, während der 
> ZN „FERTIG (Alle Zeitangaben in Sekunden und ohne Gewähr!) ir nn ei 
| weitaus mehr Zeit in An- 
Benchmark II: | Neuer Spitzenreiter bei Test I | im gleichen Zeitbereich. spruch nımmt. Benchmarks 
10 FOR I=3 TO 199 STEP 2 | ıstganz klar der Fujitsu FM 7, | Der neue (kleine) Atarı 130 | sagen auch nichts über Gra- 
20 FOR J=3 TO SQR (I) | der bereits seit | bis 2 Jahren | XE, der Nachfolger des 800 | phikfähigkeit und Tastatur 
STER2 auf dem Markt ist. Er besitzt | XL, hat in etwa die gleiche | aus, doch diese Details kann 
30 A=l/J eine 6809 - CPU und ist mit | Rechengeschwindigkeit wie ‚ man Prospekten und „nor- 
40 IF INT (A-=A THEN 70 Hilfe einer Z-80-Erweiterung | sein Vorgänger. Auch der PC | malen“ Computertests ent- 
50 NEXT J auch CP/M-fähig.' 128 von Commodore hat im | nehmen, während Geschwin- 
60 PRINT I | Überrascht waren wir über | 128er-Modus scheinbar keine | digkeitsvergleiche auf so brei- 
70 NEXT I | das schlechte Abschneiden | größere Geschwindigkeit als | ter Basis bisher (unseres Wis- 
80 PRINT „FERTIG“ | der MSX-Rechner. Die drei | der C 64, obwohl seine Ergeb- | sens) noch nicht veröffent- 
90 END getesteten Geräte lagen alle | nisse keineswegs zu den Ent- | licht worden sind. 


CPU-Club-Vorstellung: Sharp- 
User-Club 


Wir, dassind ca. 20 Leute mit | verbreiten ein Clubinfo. Wir (Verband deutscher | Anschrift: 

dem MZ-700. Unsere Aktivi- | arbeiten mit Basic/Pascal Der NE ange- | Sharp-User-Club 
täten entsprechen denen der | und CP/M und suchen lau- | schlossen und suchen auch  Dornröschenweg 15 
anderen Clubs. Wir treffen | fend Mitglieder vorwiegend | ganze Clubs, die sich in Lan- | 7500 Karlsruhe 21 
uns einmal im Monat zum | aus dem Raum Karlsruhe. desverbänden organisieren 

Erfahrungsaustausch und | Wir sind dem Dachverband | wollen. 
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Schneider: CPC-PAINTER 


Der Schneider CPC 464 ist grafisch hochtalentiert — doch was hilft’s, wenn Sie nicht das richtige Programm haben, um diese 
künstlerischen Fähigkeiten auch voll auszunutzen? Der CPC-PAINTER schafft hier Abhilfe! 


Sobald Sıe das nicht allzu lan- 
ge Programm abgetippt ha- 
ben und es mit RUN starten, 
sehen Sie eine kleine Aus- 
wahlliste. Die Nummer 3, 
„Beenden“, scheidet 
Wahlmöglichkeit vorläufig 
aus, denn sonst hätten Sıe 
sich von vornherein nicht die 
Mühe des Abtippens ge- 
macht. Nummer ?, „Laden“. 
klingt so, als ob da eine Datecı 
vorhanden sein müßte. Muß 


auch, ıst aber nicht. Also ma- | 


len Sie zuerst ein Bildchen. 
mit der Nummer |. 

Das Menü verschwindet, der 
Bildschirm wird schwarz, 
und am unteren Bildschirm- 
rand erscheint ein weißer Bal- 
ken. In Wirklichkeit sind das 
einzelne Karos -— Ihre Farb- 
töpfe, vorerst alle mit weißer 
Farbe gefüllt. Tippen Sie ein 
T, und der erste Farbtopf be- 
ginnt zu blinken. Ein Druck 
auf die  Rechts- 
Linkspfeil-Taste, und ein an- 
derer Topf blinkt. Betätigen 
Sie eine beliebige Taste (gün- 
stig, weil greifbar, liegen die 
Leertaste oder die Kommata- 


ste des Zahlenblocks), und | 


die Farbe ändert sich. Sollte 
der Farbtopf scheinbar ver- 
schwinden - keine Sorge: Sie 
haben ihn nur mit schwarzer 
Farbe gefüllt. Wenn Sie sich 
für eine Farbe entschieden 


haben, können Sie mit Links- | 


oder Rechtspfeil eine weitere 
Farbe festsetzen oder mit 
COPY abschließen. 

Erst mit F aber können Sıe 
aus Ihren Farbtöpfen einen 
auswählen, mit dessen Farbe 
Sie zeichnen wollen. Mit 
Links- oder Rechtspfeil fin- 
det die Wahl statt, irgendeine 
Taste bestätigt. Wenn Sıe 


schon einen Teil des Bildes | 
gemalt haben, werden Sie | 


feststellen: Die in eıner be- 
stimmten Farbe gemalten 
Bildteile blinken bei T und F 


ebenfalls mit. Das ist prak- | 


tisch, denn nehmen wir an, 
Sie haben mit derselben Tinte 
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als | 


| 


eine grüne Eingangstür zu eı- 
nem Haus und eine grüne 
Baumkrone gezeichnet. 
Wenn Sie nun beides blinken 
sehen, werden Sıe merken, 
daß Sie sich nicht mehr für 


eine violette Haustür ent- | 


scheiden können, indem Sie 
die Tinte nachträglich än- 


“dern, da sonst der Baum 


höchst unnatürlich aussähe. 

Nach diesem Vorgeplänkel 
kommen wir nun endlich 
zum Zeichnen. L ıst eın wich- 
tiger Befehl: Mit ihm können 
Sie, handgesteuert, eine Linie 
ziehen, und zwar von der mo- 
mentanen Position des Gra- 
fikcursors (das ıst der 
blinkende Punkt, der nach 
dem Tippen eines Grafikbe- 
fehls auftaucht) aus. Es stehen 
Ihnen acht Richtungen zur 
Verfügung, die mit den Ta- 
sten des Ziffernblocks ange- 


| sprochen werden. Die Zahlen 
oder | 


im Bereich der 5 stellen diese 
Richtungen dar, mit der Ta- 
ste 5 können Sie das Zeichnen 
der Linie abbrechen. Um ex- 
akt zeichnen zu können, ha- 
ben diese Tasten keine Wie- 
derholungsfunktion. Für län- 
gere Linien können Sıe je- 
doch die entsprechenden Ta- 
sten der Schreibmaschinen- 
tastatur benutzen, wo diese 
Funktion existiert. 

B ist ein verwandter Befehl, 
nur daß Sie hier Linien ın - 
normalerweise — dreifacher 
Breite haben. Allerdings mit 
Ausnahme bestimmter Rich- 


tungen. Damit lassen sıch t0l- | 


le dreidimensionale Effekte 
erzielen. Experimentieren Sıe 
doch damit! Gelöscht wırd 
beim PAINTER ausschließ- 
lich durch Übermalen - und 
auch hier ist B von Nutzen, 
wenn es um größere Flächen 
geht. 


wegt lediglich den Grafikcur- 


sor an eine Stelle auf dem | 


Bildschirm. Dazu werden die 
Pfeiltasten verwendet. Wenn 


Sie hinwollten, betätigen Sie | 


COPY. Von der erreichten 
Stelle aus können Sie dann 
mit L oder B eine Linie zıe- 
hen. Alle nun folgenden Be- 
fehle beinhalten bereits die 
Bewegung an den Anfangs- 
punkt; hjer ıst „Move“ nicht 
nötig. 


S für „Spiegeln“ ist cin beson- | 


ders praktischer Befehl: Sie 
können vollständig achsen- 
symmetrische Gebilde erzeu- 


| gen, indem Sie eine Figur an 
einer horizontalen oder verti- 
| kalen Achse spiegeln. Steuern 


Sie dort angelangt sind, wo | 


| Sie mit den Pfeilen an den 
| Anfangspunkt der Achse und 


betätigen Sie COPY, und 
zwar — das ist wichtig! — zwei- 
mal. Mit einer der Pfeiltasten 
legen Sie sodann die Rich- 
tung der Achse fest. Betätigen 
Sıe die Taste so lange oder so 
oft, bis die Achse (blinkend 
eingeblendet) die gewünschte 
Länge erreicht hat. Dann 


folgt wieder ein Druck auf | 
| COPY. Steuern Sıe als letztes 


den Grafikcursor von der 
Achse weg (wieder mit den 
Pfeiltasten, versteht sich — 
das wird im folgenden nicht 
mehr extra erwähnt werden), 
und zwar so, daß Sie damit 
die Höhe (oder Breite) des 
Vierecks anzeigen, das ge- 
spiegelt werden soll. Ein Bei- 
spiel zur Verdeutlichung: Sie 
haben eine horizontale Ach- 
se, d. h. von links nach rechts. 
Steuern Sıe den Grafikcursor 
unter die Achse, wobeı seine 
horizontale Position keine 
Rolle spielt, so wird alles, was 
von dem Rechteck mit der 
Achse als Grundlinie und 
dem Abstand Cursor — Achse 
als Höhe eingegrenzt wird, an 
der Achse nach oben gespie- 
gelt. Wenn Sıe glauben, das 


| noch nicht ganz verstanden 
M bedeutet „move“ und be- | 


zu haben, probieren Sie's aus. 
Nehmen Sie nun einmal an, 
Sie möchten einen Wald aus 


kleinen Laub- und Nadelbäu- | 


men zeichnen. Nun ist es aber 
recht eintönig, zwanzig Bäu- 


me jeder Sorte, die alle gleich 
aussehen, auf den Bildschirm 
zu malen. Der Befehl U löst 
Ihr Problem: Damit können 
Sie rechteckige Bildschirm- 
ausschnitte vervielfachen. 
Steuern Sie nacheinander die 
linke untere und die rechte 
obere Ecke des Ausschnitts 
an, den Sie kopieren wollen, 
und betätigen Sie jeweils 
COPY. Fahren Sie dann mit 
dem Cursor an die Stelle, an 
der die linke untere Ecke spä- 
ter stehen soll. Ein weiterer 
Druck auf COPY, und ın ein 
paar Sekunden steht Ihr 
Wald, wobei Sie nur jeweils 
einen einzigen Laub- und Na- 
delbaum zeichnen mußten! 

Flächen ausmalen kann der 
PAINTER natürlich auch. A 
lautet sinnigerweise der Be- 
fehl dafür. Wichtig ist, daß 
die Fläche vollständig von 
der Farbe, ın der Sie sie aus- 
malen wollen (d. h. der aktu- 
ellen Zeichenfarbe), um- 
rahmt ist, sonst läuft die Far- 
be aus und verunstaltet evtl. 
das ganze Bild. Für solche 
und andere Situationen ha- 
ben Sie jedoch eine „Not- 
bremse“: zweimal ESC, Sie 
hören einen kurzen Ton und 
können den nächsten Grafik- 
befehl eingeben. Jede laufen- 
de Operation wird dadurch 
gestoppt und der Cursor wie- 
der nach links unten gesetzt. 
Aber zurück zum Ausmalen: 
Eine Fläche wird von der 
Cursorposition aus zunächst 
senkrecht nach oben abge- 
sucht. Wird dort ein Punkt 
der Umrandung gefunden. so 
geht die Suche in gleicher 
Weise nach unten weiter. Es 
ist dann natürlich ungünstig, 
wenn Sıe z.B. von der Ecke 
eines Dreiecks aus dieses 
Dreieck auffüllen wollen, da 
der Computer schon nach 
wenigen Reihen auf die Be- 
grenzung stoßen wird. Steu- 
ern Sie vielmehr immer die 
höchsten bzw. breitesten Stel- 
len, bei Figuren mit vielen 
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Bögen die schmalsten an und | 


füllen Sie von dort aus auf. 
Bei komplizierten Formen 
kann es nötig sein, daß Sie die 


Fläche ın mehreren Schritten | 


von verschiedenen Stellen 
aus ausmalen müssen. 


C ist ein Befehl, den Sıe weni- 
ger oft benötigen werden. Da- 
mit ist es möglich, die Farbe 
des Grafikcursors zu ändern, 
falls dieser auf einer be- 
stimmten Hintergrundfarbe 
schlecht 
sollte. Sobald Sie C getippt 
haben, erscheint der Cursor 
lınks unten über den Farb- 
töpfen. Jede beliebige Taste 
ändert seine Farbe, COPY 
beendet. Sollte er kurz einmal 
verschwinden, so haben Sie 
gerade die Farbe Schwarz er- 
wischt. Ein weiterer Tasten- 
druck und Sie sehen ihn wie- 
der blinken. 


Die Taste R werden Sie als 
eine praktische Hilfe schät- 
zenlernen: Damit können Sie 
nämlich die oft benötigte 
Form eines Rechtecks zeich- 
nen. Leider können Sie es 
nicht rotieren lassen, um z. B. 
Rauten zu erzeugen, aber das 
ist auch nur selten vonnöten. 
Steuern Sie, um ein Rechteck 
zeichnen zu lassen, einfach 
die untere linke Ecke an und 
fixieren Sie sie mit der 
COPY-Taste. Wenn Sie nun 
mit den Pfeiltasten weiter- 
steuern, sehen Sie die Ecke 
blinken. Kennzeichnen Sie 
auf dieselbe Weise die linke 
obere Ecke. Mit Betätigen 
von COPY erscheint auch 
schon das Rechteck. 


Neben der Fähigkeit, Recht- 
ecke zeichnen zu können, er- 
laubt Ihnen das Programm 
auch die automatische Dar- 
stellung von Ellipsen. O (für 
„Oval“) ist dafür die richtige 
Taste. Sie müssen hier, wie 
bei R, einige Punkte markie- 
ren. Natürlich beginnen Sie 
mit dem Mittelpunkt. Da- 
nach steuern Sie nach rechts 
oder links und legen so die 
Länge einer Halbachse der 
Ellipse fest. Hierbei können 
Sie zwar nach oben oder un- 
ten steuern, beim Zeichnen 
wird jedoch nur die seitliche 
Abweichung vom Zentrum 
berücksichtigt. Sobald diese 
Achse gesetzt ist, steuern Sie 
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zu erkennen sein | 


nach oben oder unten (und 
zwar wieder vom 
punkt aus: der Cursor springt 
automatisch zurück) — wobei 
Sıe hier entsprechend auch 


Mittel- | 


links oder rechts steuern kön- | 
nen, ohne daß dies berück- | 
| sıchtigt wird — und legen die 


Länge der zweiten Halbachse 
fest. Gleich nach dem Druck 
auf COPY sehen Sie, wie die 
Ellipse gezeichnet wird. 


Auch n-Ecke können Sie 
zeichnen, allerdings nicht au- 
tomatisch. Das hat den Vor- 
teil, daß auch unregelmäßige 
Formen möglich werden. E 
heißt der benötigte Befehl. Fi- 
xieren Sie, wie gehabt, einen 
Eckpunkt mittels der Pfeile 
und COPY. Wenn Sie an- 
schließend die Leertaste betä- 
tigen, können sie eine weitere 
Ecke setzen. Mit jeder ande- 
ren Taste (bewährt hat sich, 
der Bequemlichkeit halber, 
ein zweiter Druck auf COPY) 
werden die Eckpunkte mit- 
einander verbunden, und 
zwar in der Reihenfolge, in 
der sie gesetzt wurden. Der 
letzte Punkt wird dabei auto- 
matisch mit dem ersten ver- 
bunden, damit eine geschlos- 
sene Figur entsteht. Wenn Sie 
die Markierungen dicht ge- 


nug setzen, werden auch Wel- | 


lenzüge möglich. Maximal 
können Sie 80 Punkte plazie- 
ren; nach dem achtzigsten 
wird die Figur automatisch 
gezeichnet. Aber so viele be- 
nötigen Sie selten. 


Wahrscheinlich benötigen Sie 
aber nicht immer eine ge- 
schlossene Figur. Manchmal 
kann die Verbindung vom 
letzten zum ersten- Punkt so- 
gar störend wirken, weil man 
sie wieder ausradieren müß- 
te. Die Taste V macht Ihnen 
hier das Leben leichter. Sie 
bedeutet „Verbinde“. Die 
Eingabe der Punkte erfolgt 
wie bei E: nur die erwähnte 
Verbindungslinie wird nicht 
gezeichnet. 


Was Ihnen nun noch fehlt, ist 
eine bequeme Möglichkeit, 
Strecken zu zeichnen. Da S 
schon belegt ist, wurde als 
Abkürzung G gewählt — was 
„Gerade“ bedeuten soll, auch 
wenn mancher Mathematiker 
da protestieren mag. Prak- 
tisch ist G dasselbe, als ob Sie 


E anwenden würden und nur | 


zwei Punkte setzten. 
wird hier die Strecke gezeich- 
net, sobald der zweite Punkt 


Nur | 


plaziert ist, und die Betäti- | 
gung der Leertaste entfällt. | 
Also: Komfortabler und als | 
Abkürzung leichter zu mer- | 


ken. 


Zwei weitere Optionen run- 
den das Ganze ab. W („Weg- 


| werfen“) ist eine davon. Ein 


Druck auf diese Taste löscht 
die Grafik und zeigt wieder 


die Hauptauswahl. Damit Sie | 


aber Ihre Grafiken auch ab- 
speichern können, wurde 
noch dıe Abkürzung K einge- 
führt. Logischerweise bedeu- 
tet dies „Kassette“ und ge- 
stattet Ihnen, eine Grafik auf 
dem dadurch bezeichneten 
Medium zu speichern. Geben 
Sie einen kurzen Namen für 
Ihr Bild an und betätigen Sie 
unbedingt die REC- und 
PLAY-Taste, bevor Sie den 
Namen ENTER bestätigen. 
Beachten Sie auch, daß Sie 
beim Zeichnen noch 2-3 
Punkte über den Farbtöpfen 
freilassen, sonst wird bei der 
Texteingabe der untere Rand 
der Zeichnung gelöscht. 


Jetzt kommt auch Punkt 2 
des Hauptmenüs ins Spiel. 
Damit können Sie Grafiken 
wieder laden. Auch hier un- 
bedingt zuerst die PLAY-Ta- 
ste und dann ENTER betäti- 
gen. Alle Files werden näm- 
lich, um die Grafik nicht zu 
verunstalten, mit einem Aus- 
rufungszeichen (!) vor dem 
Namen gespeichert, das Sie 
jedoch nicht eingeben müs- 
sen. Beim Laden bleibt der 
Bildschirm zunächst 
schwarz, bevor das Bild ur- 
plötzlich ın voller Farben- 
pracht erscheint. Wenn Sie 
sodann die Taste B betätigen, 
können Sıe das Bild weiterbe- 
arbeiten. Jede andere Taste 
zeigt das Hauptmenü. 


Gezeichnet wird übrigens im- 


mer mit Mode 0, wobei Sie | 


dreizehn Farben zur Verfü- 
gung haben. Die übrigen drei. 
über deren Verbleib Sıe sich 
vielleicht wundern werden. 
benötigt das Programm für 
den Bildschirm, den Grafik- 
cursor und Textanzeigen. 


Einige Tips für Ihre Bilder: 
Am besten gehen Sie immer 


von einfachen Grundformen 
aus, auf denen Sie dann auf- 
bauen. Zum Beispiel: Für 
eine Landschaft mit Bergen 
am Horizont setzen Sie ein 
grünes und eın blaues Recht- 
eck aufeinander (R) und fül- 
len diese in der jeweiligen 
Farbe aus (A). Mit E können 
Sie am oberen Rand des grü- 
nen Rechtecks einen Wellen- 
zug darstellen, den Sie unten 
mit der Rechteckkante bün- 
dig abschließen. Das Ganze 
wird dann ebenfalls ausge- 
füllt. Sicher haben Sie aber 
selbst noch eine Menge 
Ideen. 

Zum Abschluß noch eine 
praktische Anwendung: er- 
zeugen Sie mit dem CPS- 
PAINTER Titelbilder für 
selbstgeschriebene, längere 
Programme. Speichern Sie 
folgendes kurzes Programm 
am Anfang einer Kassette. 
I0 MODE 0: FOR ıi=0 TO 
15: INK i, 0: NEXT i: 
BORDER 0: PAPER 0: 
CLS 

LOAD “!(hier der Name 
des Bildes)“, &C000 
OPENIN“' (hier der 
Name des Bildes) .I*: For 
i=3 TO 15: INPUT Sf: 
INK i,f£ NEXT i: CLO- 
SEIN 

RUN “!(hier der Name 
Ihres Programms)“ 
Hinter diesem Programm 
speichern Sie mit dem 
PAINTER ein passendes Ti- 
telbld ab und danach 
schließlich Ihr Programm. 
Der Benutzer muß nun nur 
noch (bei zurückgespulter 
Kassette) das Band starten, 
wie das für die Begrüßungs- 
kassette im Handbuch be- 
schrieben ist, und er wird au- 
tomatisch von einem Titel- 
bild begrüßt. Das Abspei- 
chern kann stets mit SPEED 
WRITE | geschehen, da auch 
der PAINTER die Grafiken 
so ablgegt. 
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Hauptauswahl mit Pfeiltasten im rechten | Wie E, nur ohne Verbin- Namen eingeben und 
l: Zeichnen (s. dort) Winkel von der Achse | dung vom letzten zum er- noch vor Druck auf EN- 
2: Laden: Filenamen ange- wegbewegen und mittels sten Punkt. TER die REC- und 
ben (! zu Beginn nicht nö- COPY die Ausschnittbrei- | G: Gerade, d. h. eigentlich PLAY-Taste betätigen. 
tig); noch vor Druck auf te bzw. -höhe festlegen. | Strecke. Anfangs- und Achtung: Text benötigt 
ENTER die PLAY-Taste : Übertragen. Mit Pfeilen Endpunkt mit Pfeilen und unteren Bildschirmrand, 
einrasten. B verzweigt in und COPY der Reihe nach COPY setzen. dort nichts zeichnen! 
Teil „Zeichnen“ (s. u.), an- ansteuern und fixieren: | W:Wegwerfen. Löscht ge- | „Notbremse“: Unerwünschte 
dere Taste Hauptmenü linke untere und rechte samte Grafik, kehrt zu- | Operationen können durch 
3: Beenden obere Ecke des Quellaus- rück zum Grundmenü. ESC-ESC abgebrochen wer- 
schnitts sowie linke untere | K: Kassettenspeicherung. den. 
Zeichnen Ecke des Zielausschnitts. | r s : 
T: Tinte setzen. „Farbtopf“ : Ausfüllen. In eine von der Variablenliste CPC-Painter 
mit Linkspfeil und Zeichenfarbe vollständig 
Rechtspfeil wählen (aktu- umrahmte Fläche steuern. | ti(l..13) Zum Zeichnen verwendete Tinten 
elle Tinte blinkt); bel. Ta- COPY startet. Möglichst | eckx(1..80) x-Koordinaten der Eckpunkte bei E und V 
ste ändert Farbe, COPY immer die schmalste bzw. | ecky(1..80) dto., y-Koordinaten 
beenden. höchste Stelle aufsuchen, | ecke(1..80) Farbe, die ursprünglich an (eckx;ecky) stand 
F: Farbe wählen. Mit evtl. Ausfüllen in mehre- | ij Laufvariablen in Schleifen 
Linkspfeil und Rechtspfeil ren Schritten. eg als Eingabe erlaubte Tasten 
Farbtopf wählen, bel. Ta- : Cursorfarbe. Cursor er- | 18 Taste, welche betätigt wurde 
ste akzeptiert. Beachte: T scheint links unten. Bel. | n8 Dateiname 
füllt nur die Farbtöpfe, Taste ändert Farbe, COPY | x/y Koordinaten des Grafikcursors 
erst F wählt die Farbe zum akzeptiert. cf Farbe des Cursors 
Zeichnen! : Rechteck. Linke untere | bf Bildschirmfarbe (immer 0) 
L: Linie ziehen. Gesteuert und rechte obere Ecke fi- | tın Index für gewählte Tinte 
wird mit den Zahlenta- xıeren. (Pfeile, COPY) zf INK zum Zeichnen 
sten; der Stern um die 5 :Oval. Erst Mittelpunkt | ef urspr. Farbe an der Position des Grafik- 
gibt die Richtung an, die 5 setzen, dann nach rechts/ | UTSOrTS 
selbst beendet. Für Wie- links I. Halbachse. Cursor | xs/ys enth. x/y zur späteren Wiederverwendung 
derholfunktion die entspr. springt wieder zum Mit- | ef® durch Spiegelachse verdeckte Bildschirm- 
Tasten der Schreibma- telpunkt. Dann nach oben, farben 
schinentastatur benutzen! unten 2. Halbachse set- | xdir/ydır Richtung für Spiegelachse 
B: Breite Linie. Steuerung zen. Pfeile und COPY be- | t18 wie 18; verwendet, wenn t8 noch benötigt 
wie bei L; verwendet für nutzen. | wird 
dreidimensionale Effekte : Eck. Bis zu 80 Punkte wer- | xe/ye wie xs/ys; verwendet, wenn xs/ys noch be- 
oder zum großflächigen den in der Reihenfolge des nötigt 
„Radieren“. Setzens miteinander ver- | zZ Zählvarıable 
M:Move. Pfeile bewegen den bunden, der letzte auto- | xw/yu linke untere Ecke bei U oder R 
Grafikcursor, COPY be- matisch mit dem ersten. | x0/yo rechte obere Ecke bei U oder R 
endet. Punkt setzen mit Pfeilen | ew/eo linke untere Ecke des Zielquadrats bei U 
S: Spiegeln. Anfangspunkt und COPY, dann Leerta- | Ix Start einer Linie bei A 
der Achse ansteuern, dann ste, um einen weiteren | TX Ende einer Linie bei A 
zweimal COPY. Richtung Punkt zu plazieren, oder | eu bei R: Farbe an der rechten unteren Ecke 
und Länge der Achse mit erneut COPY (bzw. bel. | xm/ym Koordinaten des Mittelpunkts bei O 
Links/Rechts- bzw. Auf andere Taste), um das n- | rl/r2 Radien bei O 
Ab-Pfeil bestimmen, mit Eck zu zeichnen. |ez Zähler für Ecken bei E oder V 
COPY beenden. Punkt | V: Verbundener Linienzug. | ax/ay Anfangspunkt der Strecke beı G 


LLL—————— 
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| 
Be re | 
110 CPC - PAINTER Version 1.2 
| 00 er er EB IE EI ERTERNETRREE ER | 
| 130 " (c) 1985 by  BIG BUG Software $ ; 
| 140 Alwin Ertl $4$ i 
| 480% Mais 66 s444$ 
| 160 8497 Neukirchen $$$ i 
170 Tel. 09947/468 $ 
| 180 "rrrreere rer ne ee Her ERBEN EEE Feet 
190 ' 
200 'Vorbereitungen 
210 DIM ti (13) ‚eckx (80) ‚ecky (80) ‚eck@(80) ıMODE O:BORDER Os INK 0,01 INK 1,261 INK 2 


‚26,0:SPEED INK 15,15:FOR i=3 TO 15: INK i,2&1ti1ti-2) 
=26:NEXT i:SPEED WRITE 1 

220 ON BREAK GOSUB 1670 

230 ’Menue 
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240 CLS:PEN 1:PRINT TAB(4)5"CPC PAINTER":PRINT:PRINT"by BIG BUG Software":PRINT 
ıPRINT:PRINT:PRINT 

250 PRINT"1: Zeichnen":PRINT:PRINT"2: Laden":PRINT:PRINT"S: Ende":PRINT:PRINT:PR 
INT:PRINT 

260 e$="123":G0SUB 1540:PRINT t$;5 10N VAL(t$) GOTO 360,280,340 

270 "Laden 

280 FOR i=3 TO 15: INK i,0O:NEXT i 

290 CLS: INPUT "Name"jn$ın$=UPPER$ (n$)ı IF LEFT$(n$,1)<>"!" THEN n$="!"+n$ 

300 ECLS:LOAD n$,&CO00:0PENIN n$+".I":FOR i=1 TO 13: INPUT #9,ti(i)s INK 2+i,ti (ide 
NEXT i:sCLOSEIN 

310 t$=INKEY$: IF t$="" THEN 310 

s20 IF UPPER$(t$)="B" THEN 370 ELSE 240 

330 'Ende 

340 CLS:PRINT"Auf Wiedersehen... "ıPRINT:ıPRINT:PRINT:END 

350 Zeichnen 

3&0 CLS 

Ss70 x=Oı1 y=10ıcf=26ıbf=O0ı1tin=1l1:ızf=3 

580 FOR i=3 TO 15:FOR j=-19+(i-2)*20 TO (i-2)*20:MOVE j,0:DRAW j3,8,isNEXT j,i 
Ss90 SDUND 1,200,10,14:e$="TFLBMSUACRDEVGKAK":GOSUB 1540:0N INSTR (e$,t$) GOTO 410, 
ı 480,540,650,760,780,990,1040,1140,1190,1230,1300,138 

ı 0,1450,1480,1500 

ı 400 'Tinte setzen 

410 INK 2+tin,ti (tin) ‚bf 

420 t$=INKEY$ı IF t$="" THEN 420 ELSE INK 2+tin,ti (tin) 

430 IF t$=CHR$ (224) THEN 390 

440 IF t$=CHR$ (2453) THEN tin=tin+1:IF tin>13 THEN tin=1:G0T0 410 ELSE 410 

450 IF t$=CHR$ (242) THEN tin=tin-i: IF tin<1 THEN tin=13:60T0 410 ELSE 410 

460 tiltin)=ti (tin)+i:ti(tin)=(ti (tin) MOD 27):G0TO 410 

470 'Farbe waehlen 

480 INK zf,ti (zf-2) ,bf 

490 t$=INKEY$:IF t$="" THEN 490 ELSE INK zf,ti(zf-2) 

| 500 IF t$=CHR$ (243) THEN zf=zf+1ıIF zf>15 THEN zf=3:G60T0 480 ELSE 480 

510 IF t$=CHR$ (242) THEN zf=zf-i:IF zf<3 THEN zf=15:60T0 480 ELSE 480 

520 INK zf,ti (zf-2) :G0OTO 390 

|530 ‘Linie ziehen 

| 540 ef=TEST (x,y):PLOT x,y,2:1e8$="123456789":G0SUB 1540:3PLOT x,y,zf:DON VAL(t$) GOT 
0 550,560,570,580,390,590,600,610,620 

S50 x=x-4: y=y-2:G0TD0 630 

| 560 y=y-2:G60T0 630 

ı 570 x=x+4A:ı y=y-2:ı60T0O 630 

x=x-4:ıG0T0 630 

590 x=x+4:1G0T0 630 

xex-4ı y=y+2:ıG60T0 630 

610 y=y+2ıG0TO 430 

&20 x=x+t4ı y=y+2 

&30 DRAW x,y,2zf:G0TO 540 

640 'Breite Linie 

650 ef=TEST(x,y)ıPLOT x,y,2:1e$="123456789":G0SUB 1540:PLOT Kyy,efixs=xıys=yıDN V 
AL(t$) GOTO 660,670,680,690,390,700,710,720,730 

660 x=x-4ıy=y-2:G0T0 740 

670 y=y-2:G0TO 740 

680 x=x+4: y=y-2:60T0 740 

&90 x=x-4:G60T0 740 

700 x=x+4:G0TD 740 

710 x=ex-4: y=y+2:G0TO 740 

720 y=y+2:ıGOTO 740 

730 x=x+t4: y=y+2 

740 DRAW x,y,zfıPLOT xs+4,ys+2,zf:DRAW x+4,y+2,2fıPLOT »s-4,ys-2,zf:ıDRAW x-4,y-2 
‚zf:ıGOTO 650 

750 '’Move 

760 GOSUB 1570: IF t$<>CHR$ (224) THEN 760 ELSE 390 

770 "Spiegeln 

780 GOSUB 1570: IF t$<>CHR$ (224) THEN 780 

790 GOSUB 1570: ef$=""ıefs=ef$s+CHR$ (ef) ıxs=xıys=yıPLOT x,y,2 
800 ef$=""sef$=efs+CHR$ (ef) ıxsexiys=yıPLOT x,y,2 
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810 t$=INKEY$: IF t$="" THEN 810 ELSE xdir=O: ydir=0O 

820 IF t$=CHR$ (243) THEN xdir=4 
| 850 IF t$=CHR$ (242) THEN xdir=-4 

840 IF t$=CHR$ (241) THEN ydir=-2 
| 850 IF t$=CHR$ (240) THEN ydir=2 

860 t1$=INKEY$ 
| 870 WHILE (ti$=t$ OR t1$="") AND LEN (ef$)<255 
880 IF ti$="" THEN ti$=INKEY$:GOTO 900 
890 „=x+xdirıy=sy+ydirief$=ef$+CHR$ (TEST (x ,y) )ıPLOT x%,y,2:t1$=INKEY$ 
900 WEND 
910 xe=x:ıye=y 
920 GOSUB 1570: IF t$<>CHR$ (224) THEN 920 
930 IF xdir THEN 960 
940 FOR i=ys TO ye STEP SGN (ye-ys)#2:FOR j=x TO xs STEP SGN (xs-x)#4: PLOT xs+(j-x | 
+1) ,i1,TEST(xs-(j-x+1) ,i) ıNEXT Je 
950 z=05FOR i=ys TO ye STEP SGN (ye-ys) #2: 2=2+1: PLOT x5,i1,ASC(MID$(ef$,z,1)):ı NEXT 
i:G0TO 390 A 
960 FOR i=xs TOD xe STEP SEN (xe-xs)#4ıFOR j=y TO ys STEP SGN (ys-y) #2:PLOT i,ys+t(j 
=y+t1) ,TEST(i,ys-(j-y+1)) ıNEXT Jsi 


970 z=O: FOR i=xs TO xe STEP SGN (xe-xs) #4: 2=2+1: PLOT i,ys,ASC(MID$(ef$,z,1)) NEXT 
i:GOTO 390 

980 "'Uebertragen 

790 GOSUB 1570: IF t$<>CHRS$ (224) THEN 990 ELSE Ku=Xsyu=syseu=TEST(x,y)sPLOT x,y,2 
1000 GOSUB 1570: IF t$<>CHR$ (224) THEN 1000 ELSE xo=xXıyo=yıeo=TEST (x,y) PLOT Kyyy | 

2 


1010 GOSUB 1570: IF t$<>CHR$ (224) THEN 1010 ELSE PLOT xu,yu,eusPLOT x0,yOo,eo 
1020 FOR i=xu TO xo STEP 4:FOR jS=yu TO yo STEP 2:PLOT x+(i-xu) ,j+(y-yu),TEST(i,j| 
):NEXT j,i:G0TO 390 

1050 "Ausfuellen 

ı 1040 GOSUB 1570: IF t$<>CHRS$ (224) THEN 1040 ELSE sx=xı5y=y 

1050 yzy+2: IF TEST(x,y)=zf OR y>400 THEN y=sy+2:G60T0 1090 

1060 x=x-4: IF TEST(x,y)<>z# AND x>=0 THEN 1060 ELSE 1Ix=xıx=5x 

1070 x=x+4: IF TEST(x,y)<>zf AND x<=640 THEN 1070 ELSE rx=xıx=5x 

1080 PLOT 1x,y,zf:DRAW rX,y,2f:GOTO 1050 

1090 y=y-Zı IF TEST(x,y)=zf OR y<O THEN 390 

1100 x=x-4:s IF TEST(x,y)<>z#f AND x>=0 THEN 1100 ELSE Ix=xıx=5x 

1110 x=ex+4: IF TEST(x,y)<>z#f AND x<=640 THEN 1110 ELSE rx=xıx=5x 

1120 PLOT 1x,y,zf:DRAW rX,y,2zf:GOTO 1090 

1150 "Cursorfarbe 

1140 ef=TEST (0,10) :PLOT 0,10,2 

1150 t$=INKEY$: IF t$="" THEN 1150 

1160 IF t$=CHR$ (224) THEN PLOT 0,10,ef:G0T0 390 

1170 c#=cf+lıcf=(c# MOD 26) +1: INK 2,cf,0:60T0 1150 

1180 ’Rechteck 

1190 GOSUB 1570: IF t$<>CHR$ (224) THEN 1190 ELSE xumxsyu=myseu=TEST(x,y)ıPLOT x,y, 
2 

1200 GOSUB 1570: IF t$<>CHRS$ (224) THEN 1200 ELSE xo=xı yo=yıPLOT XuU,yu,eu 

1210 PLOT xu,yu,zf:DRAW xO,yu,zf:DRAW xo,yo,zf:ıDRAW xu,yo,zfiDRAW xu,yu,zf:GOTO 

390 : 

1220 'Oval 

1250 GOSUB 15704 IF t$<>CHR$ (224) THEN 1250 ELSE xm=xsym=yıem=TEST (x,y)sPLOT x,y, 
2 

1240 GOSUB 1570: IF t$<>CHR$ (224) THEN 1240 ELSE ır@xsyr=yıer=TEST(x,y)ıPLOT x,y, 
Zı IF x>xm THEN ri=x-xm ELSE ri=xm-x 

1250 x=xm:y=ym 

1260 GOSUB 1570: IF t$<>CHR$ (224) THEN 1260 ELSE IF y>ym THEN r2=y-ym ELSE r2=ym- 
y 

1270 PLOT xm,ym,em:PLOT xr,yr,er 

1280 DEG:PLOT xm+ri,ym,zf:FOR i=0 TO 3&0: DRAW xm+C0S(i)#ri,ym+SIN(i)#r2,zfı NEXT 

i:G0TO 390 

1290 ’Eck 

1300 ez=0 

1510 ez=ez+1: IF ez>80 THEN ez=80:G0T0 1350 | 
1520 GOSUB 1570: IF t$<>CHR$ (224) THEN 1320 ELSE eckx (ez)=xıecky(ez)=yıecke(ez)=T 

EST(x,y)ıPLOT x,y,2 
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1330 t$=INKEY$ı IF t$="" THEN 1330 
1340 IF t$=" " THEN 1310 

1350 FOR i=1 TO ez:PLOT eckx (i) ,ecky(i),ecke(i)sNEXT i 

1360 PLOT eckx (1) ,ecky(1),zfıFOR i=2 TO ezıDRAW eckx (i) ,ecky(i),zfıNEXT irDRAW ®@ 
ckx (1) ,ecky(1),zf:GOTO 390 

1370 'Verbundener Linienzug 

1380 ez=0O 

ez=ez+iı IF ez>8B0 THEN ez=80:60TD 1450 
GOSUB 1570: IF t$<>CHR$ (224) THEN 1400 ELSE 
t$=INKEY$: IF t$="" THEN 1410 

IF t$=" " THEN 1390 

PLOT eckx (1) ,ecky(1),zfıFOR i=2 TO ez:DRAW 


eckx (ez)=xtecky(ez)=y:PLOT x,y,2 


eckx (i) ‚ecky(i),zf:NEXT iıGOTO 3 


"Gerade 
GOSUB 1570: IF t$<>CHR$ (224) THEN 1450 ELSE 
GOSUB 1570: IF t$<>CHR$ (224) THEN 1460 ELSE 


ax=sxıay=y:PLOT x,y,2 
PLOT ax ,ay,zf:iDRAW x,y,zf:G0T0 5 


"Weg damit 

CLEAR: RUN 

'Kassette 

LOCATE 1,25: INPUT "Name"s;n$: IF LEFT$(n$,1)<>"!" THEN n$="!"+n$ 
FOR i=0O TO 14:MOVE O,i:DRAW 640,1 ,0:NEXT i 

1520 n$=UPPER$ (n$) ıSAVE n$,b,&CL000, (&FFFF-&C000) sOPENOUT n$+".I":FOR i=s1 TO 13:P 
RINT#9,ti(i)ıNEXT i:CLOSEOUT:GOTO 380 

15350 ’UP Eingabe 

1540 t$=INKEY$: IF t$="" THEN 1540 

1550 t$=UPPER$(t$)ı IF INSTR(e$,t$)=0 THEN 1540 ELSE RETURN 
1560 ’'UP Grafikcursor steuern 

1570 ef=TEST(x,y):PLOT x,y,2 

1580 t$=INKEY$: IF t$="" THEN 1580 ELSE PLOT x,y,ef 

1590 t$=CHR$ (243) THEN x=x+4:G0TD 1630 

1600 t$=CHR$ (242) THEN x=x-4:G0T0 1630 

1610 t$=CHR$ (241) THEN y=y-2:G60T0 16850 

1620 t$=CHR$ (240) THEN y=y+2ıGO0TO 1630 ELSE RETURN 

1630 x>639 THEN x=0O ELSE IF x<O THEN x=640 

1640 y>399 THEN y=0O ELSE IF y<O THEN y=400 

16850 GOTO 1570 

16560 "Abbruch 

1670 x=0:y=10:60TD 390 


Tips und Tricks CPC-464: 
Merge-Befehl bei der Verwen- 


dung der Diskettenstation DDI-I 


untersucht wird. Da leider | GRAMM“, A 
auch die Zeilennummer, 


Wer schon einmal mit einem | mal, wenn eın Programm 


werden soll, 


„Merge“-Befehl versucht hat, 
Programme miteinander zu 
verbinden, wird mit der Dis- 
kettenstation DDI-I schlech- 
te Erfahrungen gemacht ha- 
ben. Im Diskettenbetriebssy- 
stem der Floppy hat sich beı 
der Entwicklung ein Fehler 
eingeschlichen. Fast jedes- 
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nachgeladen 
meldet sich der Rechner mit 
der Fehlermeldung „EOF 
met“. 

Dies liegt daran, daß das 
nachzuladende Programm 
vom Diskettenbetriebssy- 
stem, nach dem Kennzeichen 
EOF (Ende der Dateı $EO), 


Länge und Pointer mitunter- 
sucht werden, wird sehr oft 
diese Kennzeichnung gefun- 
den. Wir können dıes behe- 
ben, indem wir Programme 
als ASCII-Code auf dıe Dis- 
ketten schreiben. 


Beispiel: SAVE „PRO- 


Das Laden dieser Programme 
unterscheidet sich nıcht von 
den normal abgespeicherten 
Programmen. Der einzige | 
Nachteil besteht darin, daß | 
im ASCII-Code abgespei- | 
cherte Programme mehr 
Speicherplatz auf der Disket- 


‚te belegen. 
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/X-Spectrum: Mit Maschinen- 
sprache zum Bildschirm 


Teil 2 


Im letzten Heft haben wir gelernt, wie man mit Hilfe von | 


Rom-Routinen Zeichen auf dem Bildschirm darstellen kann. 
Wer das kurze Beispielprogramm eingegeben hat, wird be- 
merkt haben, daß die Ausgabe immer in der augenblicklich 
aktıven Bildschirmfarbe erfolgte. Wıe lassen sich nun die 


Farben beeinflussen? Zum Ausdruck verwandten wir die RST | 


10 (10 hex 16 dez) Routine. Der Code des auszugebenden 
Zeichens wurde in das Register A geladen. Wir können aber 
auch die Steuer-Codes ausgeben. gefolgt von der Farbnummer. 


Die Farbsteuercodes sind: 


Dez Hex Bedeutung 
16 10 INK 

17 11 PAPER 
18 12 FLASH 
19 13 BRIGHT 
20 14 INVERSE 
21 15 OVER 


Nehmen wir also das Beispiel aus dem letzten Heft 


3E 02 LDA2 Bildschirmkanal setzen 
CD Ol 16 CALL 1601 

06 18 LDBI8 PRINT Position setzen 
0E 21 LDC 21 

CD D90D CALL 0DD9I 

3E 10 LDA 10 Steuerzeichen für INK 
D7 RST 10 Ausgeben 

3E 02 LDA?2 Farbe Rot 

D7 RST 10 Ausgeben 

3E 41 LDA4I Code für A 

D7 RST 10 Ausgeben 

(eb) RET Zurück zu BASIC 


Nach Ablaufdes Programmes steht der Buchstabe A in Rot an 
Position 0,0. Experimentieren Sie ruhig mit dem Farbwert und 
verwenden Sie auch andere Steuerzeichen. Sie werden sehen, 


wie einfach der Umgang mit dem Bildschirm ist. Sie können 
auch weitere RST 10-Befehle an das Programm anhängen, die 
neuen Zeichen erscheinen jeweils rechts vom letzten Zeichen; 
genauso, als hätten Sie in einem PRINT-Kommando ein 
Semikolon eingefügt. 


Noch zweı nützliche Adressen im Umgang mit dem Bild- 
schirm 

CALL 0D6B Löscht den Bildschirm 

CALL ODFE Scrollt den Bildschirm nach oben 

Bei beiden Routinen brauchen keine Daten angegeben werden. 
Vom BASIC aus können Sie mit: 


| RANDOMIZE USR 3435 


RANDOMIZE USR 3582 


| gestartet werden. 


| Kommen wir nun zur Graphik. Punkte können Punkte auf den 


Bildschirm plotten, indem Sie eine Routine bei 22E5 Hex 8933 
DEZ verwenden. Vor Anwendung der Routine müssen die 


| Register B und € mit den X,Y-Koordinaten geladen werden. 
| Register B 


Y-Koordinate (0-175 dez) (0-AF hex) 


Register C X-Koordinate (0-225 dez) (0-FF hex) 


| Um einen Punkt in der Mitte des Bildschirms zu setzen, 


können wiır folgendes Programm benutzen. 


06 55 LDB55 Y-Koordinate 

| OE 80 LDC 80 X-Koordinate 
CD ES 22 CALL 22E5S Punkt plotten 
CI RET 


Um Punkte zu löschen, bieten sich zwei Möglichkeiten an: 
Erstens: Sie verwenden OVER 1. Das kann durch Einfügen des 
Befehls: SET 0 (IY+87) erreicht werden. Zweitens: Sie verwen- 
den INVERSE |. Der Befehl hierfür lautet: SET 2 (IY+87). 
Beide Befehle können jederzeit aufgehoben werden, indem 
man die entsprechenden BITs zurücksetzt: also RES 0 (IY+87) 
und RES 2 (IY+87). 


SMP-T830-Al-Siemens- 
Mini-Terminal 


Folien-Tastatur und LCD- 
Anzeige sind die äußeren 
Kennzeichen eines Mini-Ter- 
minals, das Siemens für Mi- 
krocomputersysteme VOT- 
stellt. Die neue Kleinstation 


| 

| Bausteine sind die inneren 
(SMP-T830-Al) ist kaum grö- | 

| 

| 


Merkmale des Mini-Termi- 
nals: Mikrocomputer 80C31, 
EPROM (bis 8 Kbyte), RAM 
(bis 16 Kbyte). Mit dem Ge- 
rät können Programmteile 
aus dem Entwicklungslabor 
an den Einsatzort gebracht 
oder dort geändert werden. 


Ber oder schwerer als ein Le- 
sebuch, dennoch steht der 
Leistungsumfang dem eines 
herkömmlichen 
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Terminals 


mit Bildschirm und Tisch- | 
Tastatur kaum nach. CMOS- | 


gung des Zeichensatzes, Ta- 
staturbelegung und Makros. 
| Eine V.24-Schnittstelle ver- 
| bindet das Terminal mit der 
Entwicklungsstation bzw. mit 
dem Mikrocomputersystem 
| (SMP, AMS, SYS9000 o. a.). 
Für längere Strecken kann die 
| Schnittstelle auch als 20-mA- 
Stromschleife benutzt wer- 
den. 

Die LCD-Anzeige besteht aus 
vier Zeilen zu je 40 Zeichen 
(5x 7 Punktmatrix), die fen- 
sterartig den kompletten 
Speicherinhalt vorführen. 
Zwischen deutschen und AS- 
CII-Zeichensatz kann umge- 


Erleichtert wird auch die Ar- 
beit des Kundendienstes (In- 
betriebnahme, Wartung). 
Das kleine Terminal arbeitet | 
mit einer Batterie netzunab- | 
hängig bis zu acht Stunden. | 
Eine zweite Batterie puffert | 
das CMOS-RAM. Beim Aus- 
| 


schalten des Gerätes bleiben 
erhalten: Terminalkonfigu- | 
ratıon (Baudrate etc.), Festle- | 
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schaltet werden. Die alpha- 
numerische Folien-Tastatur 
(wasserdicht!) ermöglicht den 
Zugang zur menuegesteuer- 
ten Benutzeroberfläche mit 
acht Betriebsarten von „onli- 


ne“ (Terminal-Betrieb) bıs zu 
„send“ (Aussenden eines er- 
stellten Textes). Die Übertra- 
gungsgeschwindigkeit kann 
von 75 Baud bis zu 96000 
Baud variiert werden. 


TI - „PRO-LITE“ 
professionelle 
Computerleistung 
aus dem 


Aktenkoffer 


Texas Instruments stellt ei- | 
nen wirklich tragbaren, mit | 


allen Funktionen ausgerüste- 
ten PC vor, der in einem Ak- 
tenkoffer untergebracht wer- 
den kann und zudem noch 
Raum für Papier läßt. 

Mit diesem neuen Mitglied 
der PC-Familie unterstreicht 
Texas Instruments einmal 


mehr sein Engagement auf | 


dem Markt der Professional 
Computer. Sämtliche Geräte 
(Tischgeräte, 
und Pro-Lite) sind unterein- 
ander kompatibel. 

Die Portabilität ıst grundle- 
gende Bedingung für Ge- 
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Transportable | 


schäftsleute, die oft 
wegs sind. 

Vor 15 Jahren hat Tl als er- 
stes Unternehmen mit der SI- 
LENT 700 (TM)-Produktfa- 
milie ein tragbares Compu- 
ter- Terminal vorgestellt. 
Der TI Pro-Lite stellt eine na- 
türliche Verbindung der 
tragbaren Terminals und 
Professional Computer Pro- 
dukte TT’'s dar. 

Pro-Lite ist bei einer Größe 
von 75x 290 x 330 mm 4,8 kg 
leicht. Durch den flachen 
Flüssigkristall-Bildschirm ım 
Standardformat mit 25 Zeı- 
len ä 80 Zeichen wird Pro- 


uniler- 


Lite zum wirklich tragbaren 


Gerät. Die hohe Auflösung | 


des Bildschirms macht die 
Darstellung von 
möglıch. 

Als Option bietet TI einen 
externen Farb- oder Mono- 
chrom-Video-Bildschirm an. 
Durch seine Kompatibilität 
mit dem TIPC ermöglicht 
Pro-Lite den Einsatz 
über 600 der häufigsten 


Grafiken | 


von 


„Third Party*-Anwendungen | 


des MS (TM)-DOS Berriebs- 
systems. Mit Hilfe des Emu- 
lators 931 kann Pro-Lite als 
intelligentes Terminal an TI 
Bürocomputer angeschlossen 
werden und über DFÜ-Pro- 
tokolle auch mit allen Groß- 
rechnern kommunizieren. 

Pro-Lite verfügt über eınen 
RAM-Arbeitsspeicher von 
256 KB, erweiterbar auf 768 
KB. Für Programm- und Da- 
tenspeicherung ist Pro-Lite 
mit einem 3,5-Zoll-Disket- 
ten-Laufwerk mit einer Speı- 
cherkapazität von 720 KB 
ausgestattet. Damit lassen 
sich auch komplexe Lösun- 
gen wie beispielsweise die ın- 


tegrierte Software Open Ac- | 


cess (TM) von „SPI“ (Softwa- | 


International) | qrucken kann 


re Products 
einsetzen. Pro-Lite Anwen- 
dern kommt auch die Pio- 
nierstellung TI’s im Bereich 
der künstlichen Intelligenz 
zugute. 

Auf „Personal Consultant“ 
erstellte Expertensysteme, die 
bereits auf dem TIPC verfüg- 


bar sind, können nunmehr | 


wirklich mobil 
werden. 

Die Zentraleinheit des Com- 
puters ist ein 16-Bit-Mikro- 


eingesetzt 


prozessor vom Typ 80C88, | 


der auf Wunsch durch den 
numerischen Coprozessor 


8087 ergänzt werden kann. | 
| von Pro-Lite 


Mit Hilfe eines Verbindungs- 


kabels kann Pro-Lite Daten- | 


| den 
| wenderfreundlicher. 


Files mit den anderen Mit- 
gliedern der TI-Familie sowie 
des IBM PCs austauschen. 
Das modulare Design von 
Pro-Lite ermöglicht, daß der 
Anwender aufeinfache Weise 
ein System zusammenstellen 
kann, das seinen individuel- 
len Erfordernissen entspricht. 
Eine ansteckbare Erweite- 
rungsbox erlaubt den An- 
schluß eines zweiten Disket- 
tenlaufwerks sowie eines Ak- 
kus. Darüber hinaus stehen 
zwei weitere Steckplätze für 
entweder eine RS 232 sync/ 
asynce Schnittstelle. eine 
Schnittstelle für einen exter- 
nen Farb- oder Monochrom- 
Bildschirm oder ein program- 
mierbares Software-Modul 
für individuelle Anwendun- 
gen zur Verfügung. 

Die Basiseinheit enthält eı- 
nen dem Industriestandard 
entsprechenden Parallel Port 
für den Anschluß eines 
Druckers. In der tragbaren 
Form bietet TI einen 45-Zei- 
chen-Thermodrucker, der 
durch das Hauptgerät betrie- 
ben wird und auf Normalpa- 
pier oder Thermopapier mit 
40, 80 oder 132 Zeichen/Zeile 
Pro-Lite ist 
mit allen Matrix-Druckern 
der Serie OMNI 800 kompa- 
tibel. 


Die Tastatur des Pro-Lite 
bietet neben 12 frei program- 
mierbaren Funktionstasten 
insgesamt 79 Tasten ın der 
üblichen Schreibmaschinen- 
norm. Durch das zusätzliche 
numerische Tastenfeld wer- 
Rechenvorgänge an- 


Mit einem RAM-Speicher 
von 256 KB und cinem 3,5- 
Zoll-Disketten-Laufwerk mit 
720 KB liegt der Listenpreis 
bei ca. DM 
11 000,- exkl. MwSt. 


Ergänzung zum Anwender- 
programm 
„Multicolor“ für den TI-99 


Die fehlende Zahl in Zeile 910 lautet 039. 
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CPU-Happy 


Hallo, liebe Rätselfreunde! 


Diesmal hat sich die CPU- 

Redaktion was ganz Beson- E 

deres ausgedacht. Ihre Aufga- 1. Preis 

be besteht darin, die Funk- . 
tion des unten abgedruckten 10 Kassetten aus unserem Software-Service 
Unterprogrammes herauszu- 


finden. 2. Preis 

Eine Hilfe: | 3 Kassetten aus unserem Software-Service 
Vor dem Aufruf muß eine be- 

stimmte Variable mit einem i 

Wert oder einem String belegt 3. Preis 
werden. Nach Ablauf des 2 Kassetten aus unserem Software-Service 
Programmes enthält eine an- 

dere Variable einen entspre- x 

chenden Ausgangswert. 4.-30. Preis 

Haben Sie die Funktion des 1 Kassette aus unserem Software-Service 


Programmes herausgefun- 
den, so notieren Sie diese so- 
wie Ein- und Ausgangsvaria- 


ble auf eine Postkarte. Tronic Verlag GmbH 
Vergessen Sie bitte nicht Ab- Postfach 1 

sender und Angabe Ihres 3444 Wehretal | 
Computersystems! Kennwort CPU-Happy 


i8 REM xxx UnS MACHT DIESES UNTERPROGRAMM xxx 
28 REM 


38 REM EINGANGSVARIABLE = ? 
48 REM AUSGANGSVARIABLE = ? 
s8 REM 

188 L=LEN (DUS) 

i18 DE=8 


220 FOR I =: Teil 

138 BS=MIDS(DUS,1I,1) 

148 IF BS="1" THEN DE=SDE+24(L-I) 
156 NEXT I 


READY. 


Alle richtigen Lösungen nehmen an der Verlosung der Programmkassetten teil. Mitmachen darf jeder, mit 


Ausnahme der Mitarbeiter des Tronic- Verlages sowie deren Angehörige. Einsendeschluß ist der 15. 6. 1985. 


Der Rechtsweg bleibt wie üblich ausgeschlossen. 
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Deutscher Zeichensatz 
für C-64/MPS 802 


Dieses Programm ermöglicht 
das Ausdrucken von 
„AOUäöüß“ auf dem Com- 
modore-Drucker VC 1526/ 
MPS 802. Dies geschieht 
durch Einbau des Programms 
in die Ausgaberoutine. Im- 
mer, wenn bestimmte Codes 
über die Sekundäradressen 0), 
1 oder 7 der Geräteadresse 4 
ausgegeben werden, stoppt 
das Programm die Ausgabe, 
ändert das benutzerdefinier- 
bare Zeichen und gibt es aus, 
dann wird normal weiterge- 
druckt. Für die Definition ist 
es leider erforderlich, daß ein 
CHR$(141) ausgegeben wird. 
Dadurch werden alle Sonder- 
funktionen wie Invers- oder 
Breitschrift, aber auch der 
Gänsefüßchenmodus, abge- 
schaltet. Groß- oder Klein- 
schrift werden auch abge- 
schaltet: wenn man Groß- 
schrift benutzen möchte, 
muß man die Ausgabe über 
Sekundäradresse 0 laufen las- 


1818 REM COPYRIGHT 
1828 REM KLAUS SCHNEIDER 
1838 REM BAHNHOFSTR. 5 
1848 REM 4933 DETMOLD 
18580 REM 
1068 REM x#a#44% POKEN DER CODES ##K##%* 
1878 REM 
1888 FOR I=1 TO 7? 
1098 REARD W 
1108 POKE 52943+1,W 
1118 NEXT I 
1128 REM 
1138 REM ####*#%# POKEN DER DATEN #####rr%* 
11948 REM 
1158 PRINT CHR$(147) 
11868 PRINT TAB<14)"BITTE WARTEN" 
1178 PRINT 
1188 FOR 1=51712 TO 52843 
| 1198 REARD WU 
' 1298 CO=CO+W 
' 1210 POKE I,W 
1228 NEXT I 
| 1238 IF CO<>41896 THEN PRINT 
1248 PRINT "ALLES OK." 
' 1258 REM 
. 1268 REM ####% STARTEN DER ROUTINE ##%% 
. 1278 REM 
1 


sys 5ı7ı2 
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REM DEUTSCHER ZE ICHENSATZ 


sen. Benötigt man Klein- | 
schrift, erfolgt die Ausgabe 
über Sekundäradresse 7. Da- 
durch ist das Programm vor 
allem für die Ausgabe von 
Texten, wie zum Beispiel 
Briefen, geeignet. Für Listings 
sollte man die Erweiterung 
wieder abschalten. Dies ge- 
schieht durch Run-Stop/Re- 
store; vor jeder Ausgabe 
sollte die Erweiterung durch 
Sys 51712 neu initialisıert 
werden. Übrigens stört die 
Erweiterung die Ausgabe an 
die Floppy, Datasette oder 
andere Geräte nicht, sie kann 
von daher also durchaus ein- 
geschaltet bleiben. 

Die CHR$-Codes der Um- 
laute sind nicht festgelegt, je- 
der kann sie nach eigenen 
Wünschen ändern, denn die 
Standardzeichen, deren Co- 
des verwendet werden, kön- 
nen natürlich nicht mehr aus- 
gedruckt werden. Sie können 
also Zeichen, die Sie gut über 


MPS 882 
BY 


"ERROR IN DATAS" 


die Tastatur erreichen und 
die Sie sonst nicht oft ver- 
wenden, in die Codetabelle 
eintragen. So läßt sie sich bei- 
spielsweise an Textprogram- 
me oder selbsterstellte Zei- 
chensätze anpassen. Die Co- 
des im Programm stehen in 
der Reihenfolge von 
„AOUä0üß“; die Werte im 
Listing entsprechen den Co- 
des bei Epson- und kompati- 
blen Druckern. Wenn Sie sie 
ändern, müssen Sie beachten, 
daß die Werte der Codes 
nicht zwischen 0-31 und 
nicht zwischen 128-159 lie- 
gen dürfen, da in diesen Be- 
reichen die Steuercodes für 
den Drucker untergebracht 
sind. 

Wenn Sie das Programm ein- 
getippt haben und das erste 
Mal ausprobieren, werden Sie 
feststellen, daß der Druck- 
kopf bei jedem Umlaut einen 
„Schlag“ macht, durch die 
Druckwegoptimierung des 


VC 1526/MPS 802 wird dar- 
aus manchmal ein richtiges 
Hin- und Herlaufen des Kop- 
fes. Wenn Sie übrigens Breit- 
schrift einstellen, wird ein 
Sonderzeichen mitten im 
schon gedruckten Text er- 
scheinen. 


Weil das Programm die zu 
druckenden Zeichen zählt 
und da Breitschrift nicht ex- 
tra berücksichtigt wird, 
kommt es dann zu einem 
„Verzählen“ des Programms. 
Da das Programm sich das 
zuletzt benutzte Sonder- 
zeichen merkt, wird es bei 
seiner Wiederholung nicht 
neu definiert, deswegen sollte 
man das Programm vor je- 
dem Ausdruck auch mit Sys 
51712 neu starten, da so das 
letzte Zeichen gelöscht wird, 
sonst würde, wenn der 
Drucker zwischendurch ab- 
geschaltet wurde, statt des 
Sonderzeichens eventuell ein 
Leerzeichen ausgedruckt. 


Trotzdem ist das Programm 
für die Ausgabe von Texten 
nahezu ideal, wenn man auf 
Breitschrift und Inversschrift 
verzichtet. 


END 
REM 


REM 


REM 


REM 

DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


REM ###%* HIER CODES EINTRAGEN ###%* 
DATA 091 ‚892,093, 123,124,125,186 
REM xsrsrr22% DIE DATEN KrrRHaecer 


169 ,0822,141,038,083,169,202 
141,039,003,191,083,203,162 
808,142,085,203,142,084 ,203 
896 ‚872,165,154,281,084,248 
804,104 ,076,,202,241,104,133 
897,165,185,201,255,248,817 
201,096 ,248,813,2081,097,24®8 
0989 ,201,183,248,085,165,8937 
876 ‚282 ,241,133,098,138,872 
152 ,072,165,097,041,127,201 
832 ,176,003,076,245,282,165 
185 ,201,103,208,818,173,084 
203 ,208,005,169,017,032,282 
241,165,8097,162,006,,221,876 
203 ‚248 ‚806 ‚202 ,816,248,876 
217,202,138,285,083,203,208 
085,169 ,254 ‚876,231 ,882,141 
083,203,165,184,072,169,141 
832 ‚202 ‚241,032 ,284 ,255, 162 
803,189,816,203,149,183,282 
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1578 DATA 816,248,832,192,255,162,899 1718 DATA 184,178,165,897,0876 ,282,241 
1588 DATA 832,201 ,255,173,083,203,018 1728 DATA 041,127,281,8013,288,8012,162 
1598 DATA 818,018,178,168,808,189,9828 1738 DATA 888,142,085,283,142,084 ,283 
1688 DATA 283,832 ,202 ‚241 ,232,136,288 1748 DATA 165,897 ,2088,227,165,897,0494 
1618 DATA 246,169,813,832,282,241,832 1758 DATA 885,203,048,217,816,218,080 
1628 DATA .204 ,255,169,899,832,195,255 1768 DATA 0899,085,004,158,848,872,072 
1638 DATA 184,178,032,201,255,174,084 1778 DATA 0848,158,0088,808, 188,866 ,866 
1648 DATA 283,248,088,169,832 ,032 ,202 1788 DATA 0866 ,,066,188,008,8080,188,9082 
1658 DATA 241,282 ,288,248,166,898,134 1798 DATA 882,002 ,0082,188,008,0008,132 
1668 DATA 185,169,254,224,103,288 ,021 1888 DATA 042,042,042,156,8082,008 ,088 
1678 DATA 0832,202,241,169,017,208,014 1818 DATA 156,034 ,834 ‚834,156 ,000 ,0088 
1688 DATA 281,0349,208,018,169,255,077 1828 DATA 880,188,0082,002,004,198,088 
1698 DATA 885,203,141,085,283,1693,834 1838 DATA 08808,008,127,128,1496,082,044 
1788 DATA 238,084,203,133,897,104,168 1848 DATA 0888,008,8088 


DEL 64 für den Commodore 64 


Dieses Programm dient dazu, 
Programmzeilen blockweise 
zu löschen. Es wird normal 
geladen und mit RUN gestar- 
tet. Da es sich jedoch selbst 
löscht, sollte man es unbe- 
dingt vor dem ersten Laufab- 
saven. 

Nach dem Programmstart 
wird man nach der Anfangs- 
adresse gefragt, ab der die 
Maschinenroutine im Spei- 
cher abgelegt werden soll. 
Wenn der Bereich von 
$C000-$D000 nicht ander- 
weitig benutzt wird, kann 
man diesen wählen (49152). 
Nun wird das Maschinenpro- 
gramm in den entsprechen- 
den Speicherbereich gepoked, 
wobei eine Prüfsumme gebil- 
det wird. Stimmt diese, so 
wird eine entsprechende Mel- 
dung ausgegeben und der Ba- 
sic-Lader löscht sich selbst. 


e 
118: 
1208: 


208: 
218: 
220: 
238: 
248: 


Die Routine steht nun frei zur 
Verfügung. Sie wird mit SY- 
SA,Z1,Z2 aufgerufen, wobei 
A die vorher eingegebene An- 
fangsadresse ist. ZI und Z2 
stehen für die erste und die 
letzte zu löschende Pro- 
grammzeile. Hierbei ist zu 
beachten, daß diese beiden 
Zeilen ebenfalls gelöscht wer- 
den, wenn sie vorhanden 
sind. 


Für ZI und Z2 können auch 
Zeilennummern eingegeben 
werden, die im Programm 
nicht vorkommen. Dann 
werden einfach die dazwi- 
schenliegenden Zeilen ge- 
löscht. Wenn Z2 kleiner oder 
gleich ZI ist, wird einfach gar 
nichts gelöscht. 


Nach Beendigung des Lösch- 
vorganges springt die Routi- 
ne ins Basic zurück. 


REM ### DEL 584 v3 #6% 
KEN KL>1965 br KALFH LHESSIG 


INFUT"STHR ADRESSE"; A 
FÜRI=HIÜH+165 
READW:PÜKEI,W:S=5+W : NEXT 
IFS=14245 THENFRINI "ALLES UK 
FRINI"FEHLER IN UAIRS I ":END 


DATABS3Z, 253.174,032,138, 173.032 
URIHZ4r , 183,072, 152, 672,632, 253 
UHIH1/4,6032, 138, 173,632, 247,183 
DAIHIS3Z, 253,133, 254, 104,133, 020 


8 ÖHTHibd, 133, B21,032,019, 166, 165 


DH THB3Y5, 133, 251, 165, 896, 133, 252 
UHIH1 Fr ‚095, 268, Bull, 36, 165, 253 


3 DRIR133,626, 165, 294,133, 8&1, 168 


DH THBBL1., 032,023, 166, 144,012, 168 
URIHWWB, 170» 835, 170, 208, 177,835 
DH IH133, 6396, 1:34, 835, 056, 165, 646 
UHTHEEI, 896, 178, 232, 1608, 868, 177 
UATHBYS, 145, 251, 206, 265, 249, 2308 
UAIHEIE , 230, 896, 262, 206, 242,632 
DATRBSY, 166,032,851, 165,076, 116 
LRIHISY. 


II": NEW 


‚OFT P1.00 


*= 


:C506 


;BELÜCKWEISES LOESCHEN VON 
‚ PROGRAMMZEILEN 


‚19.04.1955 Er FALPH LAESSIG 


’ 


‚PARAMETER HOLEN 
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aonmn 


$REFI 
EADSA 
£E7F7 
251 
253 


cana 
Ca98 
SDEL 64 3 
Cana CHKCOM 
Cana FRMNIUM 
CORE FACINT 
Caga ZEIGI 
Caag ZE1G2 
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13 R& 


ID A&5 


Li 


STY 
STA 


CHKLOM 
FRMHIM 
FACINT 


CHKCOM 
FEMHIM 
FACINT 
Z 


EIGZ 
ZEIGZ2+1 


‚STARTADRESSE 


; SICHERN 


;ENDADRESSE 
; SICHERN 


BEREICHSANFANG SUCHEN 
PLA 


BEREICH 


#14 


ZEIGi+1 
(E5F),'YT 
BE 


SENDE SUCHEN 
ZEIGZ 


#14 
ZEIGZ+1 


#5 


#08 
$5F),Y 


;ZEILENNUMMER SETZEN 
;ZEILENADRESSE SUCHEN 
UND SICHERN 


‚KEIN PROGRAMMENDE 


;ZEILENNUMMER SETZEN 


‚ADRESSE SUCHEN 
;ZEILE NICHT VORHANDEN 


‚ZEILE VORHANDEN 
;=> ADRESSE VON NAECHSTER ZEILE 
; BERECHNEN 


;LAENGE DES ZU VERSCHIEBENDEN 
; TEILS BERECHNEN 


(ZEIG1),'Y 


L1 
ZEIGI1+1 
+60 


Li 

#65? 
A533 
#474 


;VERSCHIEBESCHLEIFE 


‚ELR 
;PRGMZEILEN NEU BINDEN 
;EINGABESCHLEIFE 
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High-Resolution Graphik 


Ein Unterprogramm zum Plotten von einzelnen Punkten für den TI-99 


Erläuterungen: ich aber nicht näher erklären | Funktion sind das z.B. An- | ein akustisches Signal ertönt. 
will, da es sich um exakt die | fangswert=O, Endwert=2x- | Wahlmöglichkeiten sind 
Zeile: Erläuterungen: Zeilen 280-340 und einer Joy- | PI=6.28, Schrittweite=.05 | dann, siehe oben. 
40- 90 Programmkopf stickabfrage handelt. Eskom- | (Normal zwischen .| und 
100-110 Erklärung men also noch 3 Zeilen hinzu. | .01), YMAX=1, YMIN=-1. Variablenliste: 
120-170 Dateneingabe Sollein Punkt gesetzt werden, | Wenn man die YMAX- und | YMAX Maximum von Y 
180-210 YMAX, YMIN- | braucht man nur den Feuer- | YMIN-Werte nicht im Kopf | YMIN Minimum von Y 
Berechnung knopf drücken. Soll der Bild- | hat, dann gibt man einfach | YI Y-Effektiv 
220-250 Übergabewerte schirm gelöscht werden, „A“ | für beides „O“ ein und der | X,Y X,Y-Werte 
XO/YO -errech- | drücken. Rechner. errechnet sich die | XO,YO Übergabewerte an 
nen Das Unterprogramm kann | Werte selbst. Das dauert et- SUB PLOT 
260-270 Tastaturabfrage auch noch in viele andere | waslänger. Das Programm ist | K1,S1 Keyrückgabevaria- 
E = ENDE Grafikprogramme eingebun- | aber trotz allem das schnell- blen 
W = Wiederholt | den werden (Zeile 280-340) | ste Plot-Programm für den TI | XE X-ENDE 
Plot und braucht dann nur mit | in Basic. XA X-ANFANG 
N = Neue Werte CALL PLOT (X,Y- | Das Programm ist gegen fal- | S Schrittweite 
280-320 Berechnung der | ‚„)„123456789ABCDEF*“) auf- | sche Werte weitgehend gesi- | H$,C$ Stringausdrücke 
Punkte im 192 mal | gerufen zu werden. X für die | chert, und so kann man mit für die CHAR-De- 
256 Raster X-Achse (1-256); Y fürdie Y- den YMAX- und YMIN- finition 
330-340 Hexadezimalum- Achse (1-192)!!"! Werten etwas spielen, und | Q,K Variable für Zei- 
rechnung man erhält tolle Verzerrun- chen (ASCII), das 
Programmbeschreibung: gen. Werden bestimmte gesetzt werden soll 
Alle „!“ können ersatzlos ge- | Nach dem Start des Pro- | Grenzwerte überschritten, | V,W Annahmevariablen 


strichen werden. 
Das Unterprogramm Call 
Plot kann natürlich auch an- 


gramms erscheint eine kurze 
Erklärung. Nach richtigem 
Start müssen dann der An- 


wie z.B. der Zeichen-Vorrat 
oder X- und Y-Werte, so 
stürzt das Programm nicht 


des SUB PLOT 
VG,WG,VR,WR,VO,WO 
Variablen zur Er- 


derweitig verwendet werden, | fangswert, Endwert, Schritt- | ab, sondern macht mit dem rechnung der 
z.B. zu einem Zeichenpro- | weite, YMAX, YMIN einge- | nächsten Wert weiter. Der Punkte bzw. der 
gramm, das auch beiliegt, daß | geben werden. Bei der Sin- | Plot ist dann erstellt, wenn CHARs 


2.4 kKbut 


IHIGH RES. FLÜÖT 
IRAINER GAURTEOW 
SOMMERHAUSEN 15 
15793 MUCH 

ıTEI . :422457/3983 
) 


an 
ma BISPLAY ATS. 1 5ERÄASE ALL: "HOCHAUFLÖOESENDER PLOT": " ; 
SH FÄAINER GAURIEÖW 2785°" : :"IIDIE FUNKTION MUSS IN ZEILE": :"1368 DEFI 
TEFT WERDEN. 2.8. :" 
11a RISPLAY ATC21.1 9: "W=SINEK DANN RUN 13M1 1" 
17a !EINGABE DER WERTE 
13AM DEF Y=SINCK) 
14a CALL SCREENG3 5: : 
:*SCHRITTWEITET": 
15a ACCEPT ATC12.15S2BEEF: AA 
1er ANCEPT ATC16,15>BEEP:S 
17a ALEDEPT ATC13.15S5BEEF: MAR 
7A 
1aA 
199 
21H 
FA 
ram 
Fg4n 
13: 
?5sA 


STOP 


BISFPLAY ATC12.1DEFASE All: "ANFAÄNGSWERT 7": ©: "ENDWERT 
i " NAH y. P B "MIN 7 „ 

ALLEFT ATE14, 15 3BEEP:KE 
IF 5<=6 THEN 166 


ANCEFT AT 20. 155BEEF: MIN 


IF KEi=XA THEN 158 
IF YMIN>YMAX THEN 


IERREÜHNEN DER GRÜOESSTEN UND KLEINSTEN Y-WERTE 

ÖN BREAK NEXT ÖN WARNING NEXT :: IF YMAX=B AND YMIN=B THEN 266 ELSE 216 

FÜR X=KA Tl XE STEPS YAAK=MARE MAR. DO YMIN=MINE MIN, WO: NEXT # 

YılzıMak-YMIN :: IF 'Yi=1 THEN Yi=2 

IRÖNITINF ZUM ERFECHNEN DER WERTE IMC 1923256 > RASTER 

FALL. CLEAR :: FÜR K=#A TO “E STEPS 

“az -SGNE KADEABSCKATDFR DECO ZIB/CRE-KA DD: : VA=1SB-ABSCYMINKC1FOAVLDD-TKC17BY 
IF Ya<s DR Ya>152 THEN 25H ELSE CALL PLOTE VB, KA, "123456 7S9ABIDEF" > 

HFAT FALL SOUND -509,500.16> 
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ELEAR 


zra CALL ELFAR 


gan 


aaa W=INTEWD: : 


16 


33m 
1:159:: 


6A CALL KEYEB.K,S1>:: 
ELSE IF K=78 THEN CALL CLEAR 
CALL CHARSET 
: END 
2ER IRMITINE ZUR EINZELPUNKTANSTELERUNG (1927256) 
SUR PIATE VW. HS) 
HG=INTENFRD: : 
WA=INTECUR/4.1-INTCUR/4.195%4.1+.59: : 
FAIL GEHAR GH GH I: 
F EAIL CHARPATiN.CH > 

a>A IF S>=143 THEN SUBEXIT 

I HEXADE?Z IMALUMRECHNUG 
138: SEGSC HS: POSCHS , SEGEL CH: VO, 1, LIOR 2°C 4-UM I. 1 3R SEGEL CH, VO+ 
CALL HEHARYG+HLSUG+1, DE: 


244 C$=SER$05. 1, VA 
CALL CHARÜR.CS I: : 


Sta 1Ar 


FALL CHARSET 


HR=U-WNGFS+1 


IF 0=32 THEN K=K+1 


IF Si1=# THEN 264 ELSE IF K=87 THEN CALL CLEAR 
GOTM 148 ELSE IF K=63 THEN CALL 


VaINTEYD:: 


Q=K.+32 


SUBEND 


YG=1INTC Y/8D: : 
YO=YRKZ+INTEUR/4. 15-1 


GOTO 236 


YR=eV-VGkS+1 
C$=RPTS$C"6",16 )ELS 


Das Floppybuch zum Apple Il 


Data-Becker-Verlag, Düsseldorf; Autor: Manfred Czerwinski; ISBN-3-89011-072-X 


sem Grund enthält das Buch 
zahlreiche Abbildungen zur 


Die kleinen biegsamen 
Kunststoffscheiben — Disket- 
ten, Floppydisks oder kurz 
Floppies genannt — sind aus 
der Welt der Mikrocomputer 
nicht mehr wegzudenken. 
Das Floppy-Buch zum Apple 
II befaßt sich intensiv mit 
den Einsatzmöglichkeiten 
dieses Speichermediums. Der 
Schwerpunkt liegt bei der Be- 
handlung der verschiedenen 
Dateiformen. 

Der Darstellung liegt das Dis- 
kettenbetriebssystem DOS 
3.3 zugrunde. Im letzten Ka- 
pitel wird das neue System 
ProDOS behandelt; die er- 
weiterten Möglichkeiten und 
Unterschiede zu DOS werden 
aufgezeigt. Alle Programme, 
die Sie in diesem Buch fin- 
den, sind unter beiden Be- 
triebssystemen lauffähig. 

Sie sollten bereits über solide 
Grundkenntnisse in BASIC 
verfügen und mit Applesoft- 


Befehlen vertraut sein. Die 
Prinzipien der Programmie- 
rung wie beispielsweise das 
Formulieren von Schleifen 
und Verzweigungen, die 
Funktion von Ein- und Aus- 
gabebefehlen oder der Um- 
gang mit Feldern und Zei- 
chenketten werden vorausge- 
setzt. 

Auf dem Gebiet der Datei- 
verarbeitung benötigen Sie 
keinerlei Kenntnisse, da wir 
sozusagen bei „Null“ anfan- 
gen. Aber auch für Fortge- 
schrittene, die mit sequentiel- 
len und Random-Dateien 
schon gearbeitet haben, bie- 
ten insbesondere die Kapitel 
5 bis 9 neue Möglichkeiten, 
Alternativen sowie Tips und 
Tricks. 

Sie finden in diesem Buch 
eine ganze Reihe von Pro- 
grammen, die Sie direkt in 
Ihren Apple-Computer ein- 
tippen und anwenden kön- 


nen. Wenn Sie beispielsweise 
eine Kunden-, Artikel- oder 
Vereinskartei benötigen, kön- 
nen Sie das entsprechende 
Programm, unmittelbar ein- 
setzen. Das Ziel des Buches 
liegt jedoch nicht darin, ferti- 
ge Programme zum Abtippen 
zu präsentieren. Vielmehr 
sollen Sie die Prinzipien der 
Dateiverarbeitung kennen- 
und verstehen lernen und den 
Entwurf der Programme 
Schritt für Schritt nachvoll- 
ziehen können. Diese Vorge- 
hensweise ist zwar für Sie zu- 
nächst etwas mühsamer, Sie 
profitieren aber wesentlich 
mehr davon: Sie können 
nämlich die Programme so 
modifizieren, daß diese für 
Ihre persönlichen Anwen- 
dungen optimal sind. Und Sıe 
sind in der Lage, eigene Pro- 
gramme zu schreiben, welche 
auf den hier dargestellten 
Prinzipien beruhen. Aus die- 


Verdeutlichung wichtiger 
Programmiermethoden; fer- 
ner sind alle Programme aus- 
führlich dokumentiert. Das 
Buch ist daher Lehrbuch und 
Programmsammlung in ei- 
nem. 


Einige Kapitel aus dem In- 

haltsverzeichnis: . 

— Eigenschaften und Anwen- 
dungen einer Floppy 

- Unsortierte sequentielle 
Dateien 

— Sortierte sequentielle Da- 
teien 

— Random-Dateien 

—- Such- und Sortierverfahren 

— Index-Sequentielle Dateien 

— Verkette Dateien 

- Programmierung eines Li- 
teraturverzeichnisses 

— Weitere DOS-Komman- 
dos und Besonderheiten 

- Das System ProDOS 


31% Zoll Micro-Floppy-Disk zum 
Mitnehmen! 


Für Olivetti M10 und Tandy TRS80-Model 100. 


Daß man seinen Computer 
mit auf die Reise nehmen 
kann, ist vielen schon eine 
Selbstverständlichkeit. Aber 
wenn schon mobiler Compu- 
ter - dann auch mobiler Spei- 
cher. In der Größe sollte na- 
türlich auch alles zusammen- 


passen. 
Damit wären wir auch schon 
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bei der PFD-400. Der netz- 
unabhängigen 3% Zoll Micro- 
Floppy für Ihren MIO bzw. 
Model 100. Klein und hand- 
lich mit erstaunlicher Lei- 
stung: 3% Zoll Drive mit 
Schnittstelle zu Ihrem Com- 
puter. Wiederaufladbare Ni- 
Cad-Batterien sowie Netzan- 
schluß für ein Ladegerät. 


Da ist Platz für jede Menge 
Daten - ca. 360 KB können 
Sie pro Diskette (formatiert) 
abspeichern. Die Zugriffszeit: 
Ganze 6 Millisekunden 
(Track to Track). 

Die PFD-400 schließen Sie 
ganz einfach an Ihren Com- 
puter über das mitgelieferte 


Übrigens — Ihre Schnittstel- 
len für Drucker und Modem 
bleiben frei! 

Last but not least ist Ihre 
Floppy mit einem integrier- 
ten Videointerface ausgerü- 
stet. Problemlos schließen Sie 
hier einen Monitor (80 x 25) 
oder ein TV-Gerät (40 x 25) 


Kabel an (BUS-Verbindung). | an. 
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„Hello“ — Anwenderprogramm 


Ist das Programm erst einmal 
vollständig abgeschrieben 
und als erstes File auf Ihrer 
Diskette zu finden, müssen 
Sie sich nach dem Einschal- 
ten des Rechners erst einmal 
zwischen der RETURN-Ta- 
ste und der SPACE-Taste 
entscheiden. Drücken Sie die 
RETURN-Taste, befinden 
Sie sich im Menü. Haben Sie 
sich aber für die SPACE-Ta- 
ste entschieden, erleben Sie 
eine kleine HIRES-Überra- 
schung, die zum schnelleren 
Arbeiten auch weggelassen 
werden kann (einfach Zeilen 
10-600 nicht mit abschrei- 
ben). 

Dieses DOS hat von mir eine 
persönliche Note bekommen. 
Ist das bei Anwendern nicht 
erwünscht - einfach die Zei- 
len 35-290 weglassen (oder in 
mühseliger Kleinstarbeit das 
Programm umschreiben, auf 
daß der eigene Name erschei- 
ne). 

Zum Menü: 

Das Menü ist sehr übersicht- 
lich. Links erscheint das In- 
haltsverzeichnis der Diskette, 


das durch Drücken der SPA- 
CE-Taste erneut geladen wer- 
den kann. 
Ist der CATALOG einmal 
länger als 18 Zeilen, muß 
man erst eine Taste drücken, 
um an die zur Verfügung ste- 
henden DOS-Anweisungen 
(auf dem Bildschirm rechts) 
zu kommen. Diese sind 
knapp und deutlich gehalten; 
aus Platzgründen, und um 
den Anwender nicht zu ver- 
wirren. 
Vorgehensweise: 
l.Zum _ Initialisierungsvor- 
gang (3. INIT): 
In diesem Programmteil 
wird zuerst nach der Dis- 
kettenkennzahl gefragt. 
Danach wird SLOTNR. 6 
vorgegeben. Ist diese zu be- 
anstanden, so ist diese Fra- 
ge mit „N“ zu beantworten 
und kann somit berichtigt 
werden. Als nächstes wird 
auf die Laufwerknummer 
verwiesen. Gleiches Ver- 
fahren wie bei der Slot- 
nummer. Es folgt ein Hin- 
weis, daß dieses Programm 
das erste auf der zu forma- 


für den Apple II 


tierenden Diskette sein 
wird. Als zusätzliche Absi- 
cherung wird noch einmal 
gefragt, ob auch die richtige 


soundso ist. 

Zum Umbenennen von 
Programmnamen (7. RE- 
NAME): 

Es ist nicht mit dem Kom- 
ma zu verfahren, sondern 
wie folgt: Name des Pro- 
gramms, welches man um- 


m 


benennen will - (RE- 
TURN) - neuer Name - 
(RETURN). 

3. Zur 9. SAVE 


Dieser Teil des Programms 
bringt nur dann einen Vor- 
teil, wenn man öfter ein- 
mal das erste Programm 
der Diskette wechseln bzw. 
erneuern will. 

Das Ganze hat zwei große 

Vorteile gegenüber dem For- 

matieren: 

l.Es wird nicht die ganze 
Diskette gelöscht. 

2. Große Zeitersparnis. 

Z. B. habe ich dauernd an 

dem Programm getüftelt und 

es immer wieder verbessert 


Diskette im Laufwerk Nr. ' 


und war es leid, immer zu 
tippen: UNLOCK HELLO, 
dann evtl. DELETE HELLO 
— etwa wenn das Programm 
kürzer geworden ist —, dann 
SAVE HELLO usw. ... 

Der Text, der dann folgt, ist 
etwa so zu übersetzen: 
„Wenn du den SAVE-Teil 
dieses Programms weiter ver- 
folgst, wird das erste Pro- 
ı gramm deiner Diskette - 
HELLO - zerstört werden, ob 
esnun durch LOCK gesichert 
ist oder nicht. Anstatt dessen 
ı wird sich dieses Programm 
selbst abspeichern und auto- 
matisch sichern. Wenn du 
fertig bist, tippe „Y“ ...“ 
Dieses Programm steigt auch 
nicht gleich aus, sollte etwa 
ein Programm mal nicht zu 
finden sein oder ähnliches. 
Wird einmal das Inhaltsver- 
zeichnis durch SPACE abge- 
fragt und ist keine Diskette 
im Laufwerk, läuft das Pro- 
gramm so lange, bis eine Dis- 
kette eingelegt oder die RE- 
SET-Taste gedrückt wird. 


(Vorsicht! Nicht gut für das 
Laufwerk!) 


10 HGR =: HGRZ : HOME : GET E$ 

15 IF E$ = CHR$ (32) THEN 20 

17 IF E£ = CHR$ (13) THEN 605 

18 GOTO 10 

20 HCOLOR= 5: FOR I = 191 TO 1 STEF - 3: HPLOT 279,1 TO I,O: NEXT I 
30 FOR I = 0 TO 191 STEF 3: HPLOT 0,I TO 88 + I,191: NEXT I 

35 REM ##%* R **% j 

40 HCOLOR= 2: FOR I = 1 TO 56: HPLOT 45,80 TO 55 + I,90: NEXT I 

50 HEOLOR= 3: FOR I = 1 TO 4: HPLOT 45,85 TO 61,55 — I: NEXT I 

60 HCOLOR= 2: FOR I = 1 TO 4: HPLOT 45,60 TO 61,60 + I: NEXT I 

70 HCOLOR= 3: FOR I = 1 TO 64: HPLOT 44 + I,60 TO 45,90: NEXT I 
75 REM ###+ ie) *%*%* 

80 HCOLOR= 3: FOR I = 1 TO 6: HFLOT 81,580 TO 82 — 1,90: NEXT I 

90 HCOLOR= 2: FOR I = 1 TO 4: HPLOT 85,60 TO 81,60 + I: NEXT I 
100 HCOLOR= 35: FOR I = 1 TO 4: HPLOT 54 + 1,60 TO 45,90: NEXT I 
110 HCOLOR= 2: FOR I = 4 TO 1 STEP - 1: HPLOT 80,90 TO 685,90 - I: NEXT I 
120 REM ##* N *%%+ 

130 HCOLOR= 3: FOR I = 1 TO 64: HPLOT 101,50 TO 102 -— I,90: NEXT I 
140 HCOLOR= 2: FOR I = 1 TO 6: HPLOT 89,50 TO 95 + 1,90: NEXT I 
150 HCOLOR= 3: FOR I = 1 TO 6: HFLOT 84 + 1,60 TO 85,90: NEXT I 
iS REM x#%#* A *%*% 
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HCOLOR= 3: FOR I = 1 TO 6: HPLOT 121,60 TO 122 -— 1,90: NEXT I 

HCOLOR= 2: FOR I = 1 TO 4: HPLOT 105,60 TO 121,60 + Iz NEXT I 

FOR I = 4 TO 1 STEP - 1: HPLOT 121,75 TO 105,75 -— I: NEXT I 

HCOLOR= 35: FOR I = 1 TO 6: HPLOT 104 + I,60 TO 105,90: NEXT I 

REM #%** L **% 

HCOLOR= 2: FOR I = 1 TO 4: HFPLOT 125,90 TO 141,85 + I: NEXT I 

HCOLOR= 3: FOR I = 1 TO 4: HPLOT 124 + I,60 TO 125,90: NEXT I 

REM x%** D **% 

HCOLOR= 2: FOR I = i TO 4: HPLOT 150,60 TO 161,65 + Iz NEXT I 

HCOLOR= 3: FOR I = 1 TO 6: HPLOT 161,65 TO 162 - 1,85: NEXT I 

HCOLOR= 2: FOR I = 4 TO i STEP - 1: HPLOT 161,85 TO 145,90 -— I: NEXT 
I 

HCOLOR= 3: FOR I = 1 TO 6: HPLOT 144 + I,&60 TO 145,90: NEXT I 

REM #%*%* *%*%* 

HCOLOR= 3: FOR I = 1 TO 6: HPLOT 173 + I,60 TO 168,70: NEXT I 

REM #%** S **%* 

HCOLOR= 3: FOR I = 1 TO 4: HPLOT 190 + 1,75 TO 180,90: NEXT I 

HCOLOR= 2: FOR I = 4 TO 1 STEP - 1: HPLOT 198,75 TO 181,75 — Iz NEXT 
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1 TO 6: HPLOT 190 + I,60 TO 180,75: NEXT I 


HCOLOR= 4: FOR I = 105 TO 110: HPLOT 1,95 TO 1,145: NEXT 
= 130 TO 135: HPLOT I,100 TO I,140: NEXT 

FOR I = 100 TO 105: HPLOT 105,I - 5 TO 135,I:z NEXT 
= 135 TO 140: HPLOT 105,I + 5 TO 135,I: NEXT 

REM #%#* [®] **% 


FOR I = 141 TO 146: HPLOT I,110 TO I,160: NEXT 
FOR I = 1664 TO 171: HPLOT I,110 TO I,16&0: NEXT 
FOR I = 110 TO 115: HPLOT 141,I TO 171,I:z NEXT 
FOR I = 155 TO 160: HPLOT 141,I TO 171,I: NEXT 
REM #%*%* S **% 

FOR I = 177 TO 182: HPLOT 1,125 TO 1,152: NEXT 
FOR I = 202 TO 207: HPLOT I,„147 TO 1,175: NEXT 
FOR I = 125 TO 130: HPLOT 177,I TO 207,I:z NEXT 
FOR I = 170 TO 175: HPLOT 177,1 TO 207,I: NEXT 
FOR I = 147 TO 152: HPLOT 177,I TO 207,I: NEXT 
FOR I = 1 TO 2000: NEXT 


REM ##* ISK **% 

HCOLOR= 3: HPLOT 137,95 TO 143,95: HPLOT 137,108 TO 145,108: HPLOT 14 
0,95 TO 140,108 

HPLOT 151, 95 TO 145,95 TO 145,102 TO 151,102 TO 151,108 TO 145,108 
HPLOT 153,95 TO 153,108: HPLOT 159,95 TO 153,102 TO 159,108 

REM ###* PERATING **% 

HPLOT 173,123 TO 173,110 TO 179,110 TO 179,117 TO 173,117 

HPLOT 187,110 TO 181,110 TO 181,123 TO 187,125: HPLOT 181,117 TO 184, 
417 

HPLOT 189,123 TO 189,110 TO 195,110 TO 195,117 TO 189,117 TO 195,123 
HPLOT 197,123 TO 197,117 TO 203,117 TO 203,123: HPLOT 198,116 TO 198, 
110 TO 202,110 TO 202,116 

HPLOT 205,110 TO 211,110: HPLOT 208,110 TO 208,123 

HPLOT 213,110 TO 219,110: HPLOT 216,110 TO 216,123: HPLOT 213,123 TO 
219,123 

HPLOT 221,123 TO 221,110 TO 227,123 TO 227,110 

HPLOT 235,113 TO 235,110 TO 229,110 TO 229,123 TO 232,125 TO 235,120: 
HPLOT 231, 117 TD 235, 117 TO 235, 123 

545 REM x#* YSTEM **%* 

550 HPLOT 209,125 TO 209,132 TO 215,132 TO 215,125: HPLOT 212,132 TO 212, 

138 
5640 HPLOT 223,125 TO 217,125 TO 217,132 TO 223,132 TO 223,138 TO 217,158 
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HPLOT 225,125 TO 231,125: HPLOT 228,125 TO 228,138 

HPLOT 239,125 TO 233,125 TO 233,138 TO 239, 138: HPLOT 233,132 TO 236, 
132 

HPLOT 241,138 TO 241,125 TO 244,132 TO 247,125 TO 247,138 

FOR I = 1 TO 2000: NEXT 

REM ##%* ANFANG **% 

ONERR GOTO 9000 

HOME : TEXT : VTAB i 


INVERSE : FOR E = 1 TO 120: PRINT " "32 NEXT 
VTAB 2: PRINT " DOS - BY RONALD KREILINGER": NORMAL 
POKE 34,3 


PRINT CHR$ (13) + CHR$ (4); "CATALOG" 
VTAB 5: HTAB 32: INVERSE : PRINT "1": NORMAL : HTAB 34: VTAB 5: PRINT 
"RUN" 

VTAB 7: HTAB 32: INVERSE : PRINT "2": NORMAL : HTAB 34: VTAB 7: PRINT 
"LOAD" 

VTAB 9: HTAB 32: INVERSE : PRINT "3": NORMAL : HTAB 34: VTAB 9: PRINT 
"INIT* 


VTAB 11: HTAB 32: INVERSE : PRINT "4"; NORMAL » HTAB 34: VTAB 11: PRINT 


” LOCK " 


VTAB 13: HTAB 32: INVERSE : PRINT "5": NORMAL : HTAB 54: VTAB 13:2 PRINT 


"UNLOCK" 


VTAB 15: HTAB 32: INVERSE : PRINT "&": NORMAL : HTAB 354: VTAB 15: PRINT 


"DELETE" 


VTAB 17: HTAB 32: INVERSE : PRINT "7": NORMAL : HTAB 54: VTAB 17: PRINT 


"RENAME" 
VTAB 19: HTAB 32: INVERSE : PRINT "8": NORMAL =: HTAB 34: VTAB 19: PRINT 
"EXIT" 
VTAB 21: HTAB 32: INVERSE : PRINT "29"2 NORMAL = HTAB 34: VTAB 21: PRINT 
„n SAVE „ 
POKE 33,31 
IF PEEK ( — 16384) < 128 THEN 750 
GET WN$ 
IF WN$ = CHR$ (32) THEN POKE 33,40: HOME : GOTO 450 
IF WN$ = "1" THEN 1000 
IF WN$ = "2" THEN 2000 
IF WN$ = "3" THEN 3000 
IF WN£ = "4" THEN 4000 
IF WN$ = "5" THEN 5000 
IF WN$ = "&" THEN 6000 
IF WN$ = "7" THEN 7000 
IF WN$ = "8" THEN 8000 
IF WN$ = "9" THEN 10000 
IF WN$ < "1" OR WN$ > "8" THEN 750 
REM ##* RUN **% 


POKE 34,0: POKE 355,40: HOME 

HTAB 19: INVERSE : PRINT "RUN" 

VTAB 5: HTAB 14: INVERSE : PRINT "RETURN": NORMAL =: VTAB 5: HTAB 21: 
PRINT "= MENU" 

PRINT = PRINT : INPUT "WHAT FILE? ":F$ 
D$ = CHR$ (4) 

PRINT D$; "RUN"; F$ 

GOTO 1000 

REM ##* LOAD **%* 

POKE 34,0: POKE 33,40: HOME 

HTAB 18: INVERSE : PRINT "LOAD" 

VTAB 5: HTAB 14: INVERSE : PRINT "RETURN": NORMAL : VTAB 5: HTAB 21: 
FRINT "= MENU" 

PRINT : PRINT =: INPUT "WHAT FILE? "sF$ 
D£ = CHR$ (4) 
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PRINT D$; "LOAD";F$ 
GOTO 2000 

REM #*%** INIT *r%* 

POKE 34,0: FOKE 353,40: HOME 

HTAB 18: INVERSE : PRINT "INIT" 

VTAB 5: HTAB 14: INVERSE : PRINT "RETURN": NORMAL =: VTAB 5: HTAB 21: 
PRINT "= MENU" 
5 =-646D=1 

VTAB 8: INPUT "VOLUME? "3;V 

HTAB 1: VTAB 12: PRINT "SLOT # &4 — RIGHT?"= VTAB 12: HTAB 20 

GET E$ 

IF E$ = "N" THEN 3095 

GOTO 3110 

VTAB 12: HTAB 28: INPUT "SLOT # ";5 i 

HTAB 1: VTAB 16: PRINT "DRIVE # 1 - RIGHT?" VTAB 16: HTAB 20 

GET E$ 

IF E$ = "N" THEN 3117 

GOTO 3120 

VTAB 16: HTAB 27: INPUT "DRIVE # ";D 

VTAB 19: HTAB i: PRINT "THIS PROGRAM WILL BE THE 1ST ON THE DISKYOU’ 
RE FORMATTIN’.": PRINT 

VTAB 22: HTAB 1: PRINT "DO YOU HAVE THE RIGHT DISK IN DRIVE "D"?": VTAB 
22: HTAB 39 ß 

GET E$: IF E$ = "N" THEN 3124 

PRINT CHR$ (i3) + CHR$ (4) "INITHELLO,V"3V5",5"555",D";D 

PRINT CHR$ (13) + CHR#£ (4)"LOCK HELLO" 

GOTO 3000 

REM ##%* LOCK **% 

POKE 34,0: POKE 33,40: HOME 

HTAB 18: INVERSE =: PRINT "LOCK" 

VTAB 5: HTAB 14: INVERSE : PRINT "RETURN": NORMAL = VTAB 5: HTAB 21: 
PRINT "= MENU" 

PRINT =: PRINT : INPUT "WHAT FILE? ";F#$ 
DE = CHR#$ (4) k 

PRINT D$; "LOCK";F$ 

GOTO 4000 

REM x#** UNLOCK **%* 

POKE 34,0: FOKE 33,40: HOME 

HTAB 17: INVERSE : PRINT "UNLOCK" 

VTAB 5: HTAB 14: INVERSE : PRINT "RETURN": NORMAL =: VTAB 5: HTAB 21: 
PRINT "= MENU" £ . 

PRINT =: PRINT : INPUT "WHAT FILE? ";F#$ 
D$ = CHR$ (4) 

PRINT D$; "UNLOCK";F# 

GOTO 5000 

REM #%** DELETE **%* 

POKE 34,0: POKE 33,40: HOME 

HTAB 17: INVERSE : PRINT "DELETE" 

VTAB 5: HTAB 14: INVERSE : PRINT "RETURN": NORMAL =: VTAB 5: HTAB 21: 
PRINT "= MENU" 

PRINT =: PRINT : INPUT "WHAT FILE? ";F# 
D$ = CHR$ (4) 

PRINT D$; "DELETE";F$ 

GOTO 6000 

REM #** RENAME *** 

FOKE 34,0: POKE 35,40: HOME 

HTAB 17: INVERSE : PRINT "RENAME" 

VTAB 5: HTAB 14: INVERSE : PRINT "RETURN": NORMAL = VTAB 5: HTAB 21: 
PRINT "= MENU" 
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0°’, IN-" 
10050 PRINT : 


10080 GET E$: 
10082 IF E$ 
100685 GOTO 10060 
10070 D£ 


CHR$ (13) + 
TE HELLO": PRINT D$; "SAVE HELLO": 


PRINT "DEPENDENT OF IT’S LOCKED OR NOT. 
THAT, THIS PROGRAM WILL SELF-SAVE AND": PRINT "-LOCK. 
v.= HIT "Ya 
IF E$ 
CHR$ (13) THEN 610 


PRINT 
ya 


THEN 10070 


CHR$ (4): 


7070 PRINT : PRINT : INPUT "WHAT FILE? ";0$ 

7080 PRINT : PRINT : INPUT "NEW NAME? "zN$ 

7100 D$ = CHR$ (4) 

7110 PRINT D$; "RENAME "50%; ",";N$ 

7120 GOTO 7000 

8000 REM #*** EXIT #%% 

8010 POKE 34,0 

8020 POKE 33,40 

8100 HOME 

8999 END 

9000 INVERSE :D$ = CHR$ (7) 

9001 INVERSE :D$ = CHR$ (7) 

9002 IF PEEK (222) = 1 THEN PRINT : PRINT : HTAB 10: 

NOT AVAILABLE": GOSUB 9090 

9010 IF PEEK (222) = 4 THEN PRINT : PRINT : HTAB 14: 
ODTECTED": GOSUB 9090 . 

9020 IF PEEK (222) = & THEN PRINT : PRINT : HTAB 14: 
FOUND": GOSUB 9090 

9030 IF PEEK (222) = 8 THEN PRINT : PRINT : HTAB 16: 
R": GOSUB 9090 

9035 IF PEEK (222) = 10 THEN PRINT =: PRINT : HTAB 14: 
CKED": GOSUB 9090 

9040 IF PEEK (222) = 16 THEN PRINT =: PRINT : HTAB 14: 
ERROR": GOSUB 9090 

9050 IF PEEK (222) = 13 THEN PRINT : PRINT : HTAB 12: 
PE MISMATCH": GOSUB 9090 

9080 NORMAL 

9085 GOTD 9100 

9090 FOR E = 1 TO 1000: NEXT : RETURN 

9100 GOTO 610 

10000 REM #**#* SAVE  x##% 

10010 POKE 34,0: POKE 33,40: HOME 

10020 HTAB 18: INVERSE : PRINT "SAVE" 

10030 VTAB 5: HTAB 14: INVERSE : PRINT "RETURN": NORMAL 
: PRINT "= MENU" 

10040 PRINT : PRINT : PRINT "IF YOU’RE CONTINUIN’ THE 
"SAVE";: NORMAL : PRINT "-PART OF": PRINT : 
ILL DESTROY THE FIRST": PRINT : 


PRINT D$; "UNLOCK HELLO": 
PRINT D$; "LOCK HELLO": 


ei 
PRINT "THIS PROGRAM, IT W 
PRINT "FILE ON YOUR DISK CALLED HELL 


INSTEAD": 


PRINT D$; "LANGUAGE 
PRINT D$; "WRITE PR 
PRINT D$; "FILE NOT 


FRINT D$; "I/O ERRO 


PRINT D$; "FILE LO 
PRINT D$; "SYNTAX 


PRINT D$; "FILE TY 


= VTAB 5: HTAB 21 


INVERSE : PRINT 


PRINT "OF 
IF YOU’RE READ 


PRINT D$; "DELE 
GOTO 610 


Auflösung des CPU-Rätsels 
aus Heft Nr. 6 


Wenn Sie die Fragen dieses 

Rätsels richtig beantwortet 

haben, ergibt sich folgende 

Zahl: 

— Welche Aufgabe hat ein Vi- 
deocontroller? 3 = Bildauf- 
bau in einem Computer 

— Bedeutung von CP/M? 5 = 
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Diskettenbetriebssystem 

— Was ist ein Sprite? 7 = 
Durch Hardware belegte 
Figur 

— Welche Funktion erfüllt 
ein Paddle? 10 = Drehregler 
für analoge Eingaben 

— Welche Computersprache 


verwendet zum Zeichnen 
eine Schildkröte? 14 = Logo 
— Wozu dient ein RESET? 17 
Zum Rücksetzen des 
Computers 
— Welcher Teil eines Compu- 
ters wird mit Akkumulator 
bezeichnet? 20 = Hauptre- 


gister des Prozessors 
— Was ist BIOS? 23 = Teil 
eines bekannten Betriebs- 
systems 
— Ein Netzwerk ist? 25 = Die 
Zusammenschaltung von 
mehreren Computern 
3+5+7+10+14+17+20+ 
23+25=124 
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2. Elektronik- & Computertage 
Saar 


2. Verkaufs- und Informationsmesse für Elektronik- und Microcomputer 
vom 6.-8. September 1985 in der Kongreßhalle Saarbrücken 


Mit über 60 Ausstellern und 
fast 7000 Besuchern waren 
die I. Elektronik- & Compu- 
tertage Saar für alle Beteilig- 
ten ein großer Erfolg. 

Nach der Eröffnung durch 
den Schirmherrn, dem saar- 
ländischen Landtagspräsi- 
denten Albrecht Herold, Ver- 
tretern der Ministerien sowie 
Presse, Rundfunk und Fern- 
sehen, bot sich den Besu- 
chern auf einer Ausstellungs- 
fläche von fast 1100 qm ein 
repräsentativer Querschnitt 
durch die gesamte Elektro- 
nik- 
branche. 


Einen sehr hohen Besucher- 


anteil stellten Vertreter von | 


Handwerk- und Industriebe- 
trieben aus dem Saarland und 
den benachbarten Regionen 
dar. Besonders erfreulich war 
die Tatsache, daß viele Besu- 
cher aus Frankreich, Luxem- 
burg und sogar aus Belgien 


und Microcomputer- | 


die Elektronik- & Computer- 
tage Saar besucht haben. 

An diesem positiven Ergeb- 
nis hatte sicherlich die Prä- 
sens von namhaften Firmen 
wie APPLE, EPSON, FUJIT- 
SU, HP, IBM, KONTRON, 
OLIVETTI, TOSHIBA, 
TRIUMPH ADLER, COM- 
MODORE und WANG, um 
nur einige wenige zu nennen, 
einen großen Anteil. 

Daß diese Firmen auch dieses 
Jahr ihr Kommen, teilweise 
mit erheblicher Standvergrö- 
Berung, wieder zugesagt ha- 
ben, istein Grundstein für ein 
noch besseres Resultat. 


Neben den kommerziellen 
Rechnern findet der Interes- 
sent eine große Auswahl an 
Zubehör und Fachliteratur. 
Aber auch die Elektronik mit 
modernen Kommunikations- 
technıken und der Video- 
und Audiobereich gehören 
zum Ausstellungsschwer- 


| punkt. Im Foyer West der 


Kongreßhalle finden unsere 
Jüngeren Besucher ihr 
„Heimcomputerparadies“, 
mit allem Zubehör, was das 
Herz begehrt. 

Die Elektronik- & Computer- 
tage Saar werden auch 1985 
nach dem bereits bewährten 
Konzept mit folgenden 
Schwerpunkten ausgerichtet: 
- Kommerzielle Hard- und 
Software aller marktführen- 
den Hersteller für Handel, 
Handwerk, Industrie und 
Dienstleistung! 


| -— Ständige Vorführungen von 


Standard-Software, wie Fi- 
nanzbuchhaltung, Lohn- und 
Gehaltsabrechnung, Lager- 


und Auftragsverwaltung so- | 


wie der modernen Textverar- 
beitung für den Klein- und 
Miittelbetrieb! 


— Besondere Programmpro- 


| dukte für freiberuflich Tätige 


| wie 


Rechtsanwälte, Ärzte, 


Steuerberater, Architekten 
usw.! 

— Fachvorträge durch Refe- 
renten namhafter Firmen 
und dem Institut für Infor- 
matik in Saarbrücken! 

—- Große Auswahl an Fachli- 
teratur! 

— Audio- und Video sowie 
moderne Kommunikations- 
techniken! 

— Umfangreicher Zubehör- 
handel vom Laserdrucker bis 
zur einfachen Diskette! 

— Heimcomputer und Zube- 
hör ın allen Preisklassen für 
unsere jüngeren Messebesu- 
cher! 


| — Meßgeräte, Elektronikteile 


und Zubehör für Profis und 
Bastler! 

— Besondere Vorführungen 
im Bereich Amateurfunk, wie 


| Meteosatempfang, Funkfern- 


schreiben per Computer 
usw., durch den Deutschen 
Amateur Radıo Club, Orts- 
verband Völklingen. 


Ein Super-Disassembler für den 
TI-99 


Zum Programmieren in Ma- 
schinensprache benötigt man 
neben einem Assembler und 
einem Monitorprogramm 
auch einen Disassembler. Ei- 
nen solchen stellt das folgen- 
de Programm dar, das um vie- 
le Besonderheiten erweitert 
wurde. Es läuft auf den 11-99 
mit Extended Basic, Diskette 
und 32K-Speichererweite- 
rung. 

Disassembler werden ver- 
wendet, um z.B. das Be- 
triebssystem eines Compu- 
ters zu analysieren oder Feh- 
ler in eigenen Maschinenpro- 
grammen aufzuspüren. Der 
abgedruckte Disassembler 
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hat aber einige Zusatzfunk- 
tionen, die meist fehlen, ob- 
wohl diese sehr wichtig sind: 
— Relative Sprünge und 
CRU-Bit-Befehle werden 
auch für negative Werte kor- 
rekt dısassembliert. z. B. JOC 
$-8 oder TB -20. Dabei wird 


beı Relativsprüngen die abso- | 


lute Adresse des Sprungziels 
berechnet. 

— Der Pseudo-Befehl NOP 
(No Operation) wird erkannt. 
- Die Befehle IDLE. RSEI 
CKON, CKOF und LREX. 
dıe zwar der TMS9900 ver- 
steht. die aber auf dem TI-99 
nicht verwendet werden. wer- 
den ebenfalls dısassembliert 


und mit eınem Fragezeichen 
angezeigt. z. B. "IDLE?“. 


— Die wichtigste Besonder- | 


heit: Adressen im CPU-RAM 
von »8300 bis »33FF sowie 
der Sprung in den GPL-Inter- 
preter NEXT (0070) werden 
statt eines Zahlenwertes als 
Labels ausgegeben. Z.B. ıst 
der Befehl SB SSTATUS- 
SJOYSTX erheblich leichter 
zu verstehen als SB 
9837C.98377 

Zur Programmbedıenung: 
Sobald es mit RUN gestartet 
wird. erscheint eine über- 
sichtliche Eingabemaske. 


Hier geben Sıe die Start- und 


dıe Endadresse des zu dısas- 


semblierenden Bereichs eın. 
Diese Eingaben können Sıe 
dezimal oder hexadezımal 
machen. Im letzteren Fall 
müssen Sıe das Hex-Symbol 
“,“ voranstellen. Außerdem 
können Sıe wählen, ob das 
Listing zusätzlich auf dem 
Drucker oder auf Diskette 
ausgegeben werden soll. 


Kurz darauf beginnt das Pro- 
gramm mit dem Disassem- 
blıeren. Die Ausgaben haben 
auf dem Drucker und dem 
Bildschirm das gleiche For- 
mat, nur daß auf dem 
Drucker mehr Zeichen ın je- 
der Zeile darstellbar sind. 
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0AA8 O2EO LWPI 


GPLWS 

83E0 

VAAC BSOE AB R14,$TIMER 
8379 

0ABO C320 ‚MOV $SUDFINT,RI2 
83C4 

0AB4 1301 JEQ  »OAB8E 

0AB6 069C BL *R12 

0ABS 04C8 CLR RS 

0OABA 0O2EO LWPI INTWS 
83C0 

OABE 0380 RTWP 


l. Spalte: Speicheradresse 

2. Spalte: Inhalt der Adresse 

3. Spalte: Assembler-Befehl 

4. Spalte: Zugehörige Operanden 

Folgende Tabellen werden statt der entsprechenden Adressen 
angezeigt: 

»0070 NEXT = Sprung in den GPL-Interpreter 

»2008 NUMASG = Numerischen Parameter zuweisen 


»200C NUMREF = Numerischen Parameter holen 

»2010 STRASG = Stringparameter zuweisen 

»2014 STRREF = Stringparameter holen 

»2018 XMLLNK = ROM-Routinen aufrufen 

»201C KSCAN = Tastaturabfrage 

»2020 VSBW = Ein Byte in den Video-RAM schreiben 

»2024 VMBW = Mehrere Bytes in den Video-RAM 
schreiben 

»2028 VSBR = Ein Byte aus dem Video-RAM lesen 

»202C VMBR = Mehrere Bytes aus dem Video-RAM le- 
sen 

»2030 VMTR = VDP-Register schreiben 

»2034 ERR = Fehlermeldung ausgeben 

»83300 PAD = CPU-RAM-Pad 

»83IE BASCMD = Zeiger auf gerade bearbeiteten Basıc-Be- 
fehl 

»8322 ERRCOD = Fehlercode bei Rückkehr aus Maschi- 
nenprogramm 

»832E ACTLIN = Zeiger auf gerade bearbeitete Basic-Zeile 

»8330 LSTLIN = Zeiger auf Ende der Zeilenliste 

»8332 FSTLIN = Zeiger auf Beginn der Zeilenliste 


»833A SUBLST Zeiger auf Liste der CALL-Unterpro- 


gramme | 
»833C PABLST = Zeiger auf Liste der PAB-Blöcke 
»833E VARLST = Zeiger auf Liste der Variablen 
»8340 VDPSTR = Zeiger auf freien Video-RAM für Strings 
»83344 RUNFLG = Basic-Run-Flag (0 oder 255) | 


»8345 BASFLG = Basıc-Flag-Byte (TRACE, PROTEC- 
TION, NUM etc.) 

»834A FAC = Fließkomma-Akku | 

»8354 OVLERR = Fehlerflag bei Fließkomma-Operationen 

»835C ARG = Fließkomma-Akku 2 

»836E VSPTR = Value Stack Pointer 

»8370 VHIMEM = Höchste nutzbare Adresse im Video- 
RAM 

»8372 DATSTK = Zeiger auf GPL-Daten-Stack 

»8373 SUBSTK = Zeiger auf GPL-Unterprogramm-Stack 

»8374 KBOARD = In CALL KEY gewählter Tastaturmodus 

»8375 ASCII = Wert der gedrückten Taste bei 

; SCAN/KSCAN 

»8376 JOYSTY = Y-Koordinate des Joysticks 

»8377 JOYSTX = X-Koordinate des Joysticks 

»83378 RANDOM = Zufallszahlen 


»8379 
»837A 


INTCNT = Interruptgesteuerter Counter 
SPRMOT = Höchste Nummer der Sprites, die bewegt 
werden können 


»8337B VSTAT = VDP-Status-Register 
»837C STATUS = GPL-Statusbyte 
»8384 KXHIMEM = Höchste nutzbare Adresse der Memory 


Expansıon 


»8386 XHFREE = Zeiger auf höchste freie Adresse der Me- 
mory Expansion 

»83C0 INTWS = Interrupt-Workspace 

»33C2 IFLAG = Interrupt-Flag 

»83C4 UDFINT = User-defined Interrupt 


»83CC SNDLST = Zeiger auf Soundliste für automatische 
Tonerzeugung 

»B3CE SNDBYT = Gerade gespieliws Soundbyte 

»83DO GRMSRC = GROM-Suchadresse 

»83D2 ROMSRC = ROM-Suchadresse 

»83D4 VICOPY = Kopie des VDP-Registers | 

»83D6 CLSCNT = Counter für Clearscreen 

»83D8 SCANRT = Rücksprungadresse von SCAN/KSCAN 


»8B3E0 GPLWS = GPL-Workspace 


” . » S E ” > & [23 A ” ® EB » 
"FMONB?,7SDE 7,7 5DCh: 
JENS IHRER © 
männl Frhr 


2 CK 
» 4% 


100 ı! EUIHIHHH MICH IH ICH 
110 REIHE IE EICH IHM I ICH 

120 ı x %* 

130 1 * IISASSEMRBLER En 

140 1 * * 

150 1 HEREIN IE N: 

150 ! EEE IHM 

170 |! 

180 ! Für den TI-9%9 mit Extended Basic 
90," 

200 ! <c) Martin Kotulla 1985 

210 |! 

2 Ivs3=-=- 35-32 =4 en neo 
230 ! 

240 TATA ”"SZC ”,”SZCR”,”S5 

250 IATA ”A "AH 7, MOV 

2650 DATA> "JM IE IE 

2707. DATA SINE SINE 7, J0E 

280 T,ATA ”JOF ”,”SküO ”,”5RZ 

299. DATA: "ECOE 7,752 

3009 DATA "IOLCRKR”,”’STOR” 
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310 DATA. "SRA -*,"’SRE 7%FSL.A RZ TSRE * 

320 TIATA ”"BLWP”,”ER Me ER » CR ?,’NEG ”,7INV ” 

330 DATA "INC ”,?INCT”.?’DLEC ?,”"DECT”.”BL °”.”5WFR” 

340 LATA ”"SETO”,”"ARS ” 

350 DATA "LI » AL ” SANTTY SORT "26H 

360 ! Labels für CFU-RAM im Bereich ?8300 bıs >BZFF EEE HIIIE II III HMIHKEHIKHIH 
370 IATA 0,FAL,30 , BASCHT 34 „ERRCOT, 46, ACTLIN.48, LSTLIN.5O,FSTLIN,58,5UBRIST 
380 DATA 60,FARLST,62,VARLST,64, VOPSTR,68,RUNFLG, 69 ,BASFLG, 74, FAC 

290 TIATA 84 ,DVLERR,92,ARG,110,VSPTR,112,VHIMEM, 114 ,LATSTK, 115,5UBSTK 

400 TIATA 116.KROART,117,ASCII,118, JOYSTY,.119, JOYSTX,120, RANLOM,AL21,INTENT 
410 TıATA 122.SFRMOT,1723,V5STAT,124,5TATUS,132,XHIMEM, 134, XHFREE,192,INTWS 
4209 DATA 194 ,IFLAG, 196 ,UDFINT,204 ,SNDLST,206.8NIBYT,208, GREMSEC,„210,ROMSRC 
430 TATA 212,V1COFY, 214,CLSCNT,216,5CANKT,224,GFLWS 


440 | Labels für Assembler-Hilfsprogramme im l.ow Memory von >2000 - IPAF4 CO RRRRRR 
450 IIATA NUMASG ,NUMREF „STRASG,STRREF „XMLLNK,KSCAN „VSBW,UMEW, VSBR„VMER,VWTR,ERR 
4650 ! Definitionen und Daten einlesen REES EEE REINE 


470 LIM FM1$(11),FM2$(15) ,FM3$ (2) „FM4$ (1) ,FM5$ 03) 

480 DTIM FM6$(13) ,FM8$ (4) ,LABEL$(1,255) 

4930 FOR I=0 TO 11 x: REAL FMi$tiden NEXT I 

500 FOR I=0 TO 15 :: REAI FM2$(I)sz NEXT I 

510 REAI FM3&(0) ,FM3$C1),FM3$(2) 

520 REAU FM4$(0),FM4AS (Ci) 

530 READ FM5$(0),FMS$C1) ,FMS#k(2) ,FMS403) 

=40 FOR I=0 TO 13 =: REAT FM6$(I)s= NEXT I 

550 FOR 1=0 TO 4 :z: REAI FM8$(I)er NEXT I 

560 HX$="701234564 799 ARCHEF ” 

=70 TIEF HEX$CX)=SEG$CHX$ ,INTCX/LS)+L,L)ASEGSCHXS, X-INT{X/16)#15+1,1) 
580 TIEF HEXWS CK) =HEXSCINT CX/256) )&HEXSIX-INTCX/256 8256) 

590 DEF DEZ(CX$)=(POSCHX$,SEG$CX%,1, ER SEGS(XS,2,1),12D-1 
600 DEF DEZUCXSI=DEZCSEGSCKE , 1.2) I «I 5H+LEZISEGSCKE Zu) 

610 DEF COMFL2=I+65536# (13327672 En ER einer Integerzahtl 
620 I Titelbild EEE EEE NENNE NENNE TEIE HEN IE ICH IE MIETE EINIIHICK MER ICH: 
630 CALL CHAR(#2,"AASSAASSARASSAASST 31."FEBAFFALALFIBLFE”: 

640 CALL CHAR(135,.RFT$4”0” ,8)&”FF”) 

650 CALL CHAR(C12B, Br Ne 

660 CALL CHAR(130,”’FRFÜUOSOZOLOLOL4FELHLSLAPOZOAFTOFE" 

670 CALL CLEAR :: CALl. HCHAR(2,4,42,26) 

30 CALL VCHAR\3,4,42.59:: CALL. VCHAR(3.29, u 

690 GCALL MAGNIFY(3) rn: CALL SFRITE(#1,128,.2,28, 50) 

700 NISPFLAY AT(5S,11)5SIZE(12):"LISASSEMELER” 

710 CALL. HCHAR{8,4,42,26) 

720 DISFLAY AT(12,4):CHRE(91)&” MARTIN KOTULLA 1985” 

730 CALL HCHAR(13,6,136,22) 

740 DISFLAY AT(15,1):”- STARTALRESSE?”: 3”- ENDIADLRESSE?” 

750 DISPLAY AT(19,1):”- DRUCKERAUSGABE? N” 

780 ACCEFT AT(15,20)SIZE(S)VALTDATECHXS, Y2)EST$ 

770 IF ASC(ST$)=4? THEN START=BEZWISEG$(STS,2,4))ELSE START=VAL(STS) 
780 START=INT(START/2)*2 

790 ACCEFT AT(17,20)SIZECSIVALIDATECHXS, ">" ISENS 

800 IF ASCLEN$)=6? THEN ENDE=DEZWISEG$CENS,2,4))ELSE ENIE® VAL<EN$) 
810 ENTIE=INT<(ENDE/2)%2 j 

820 ACCEFT ATt19,20O)SIZEC-L)VALINATEC”"IN”IHFILES 

830 IF FILE=1 THEN CLOSE #1 :: FILE=O 

840 IF FILE$="N” THEN FILE=O ss: G0TO 890 

850 FILE=1 

840 DISFLAY AT(21.1):”- TRUCKERNAME? RS232" 

870 ACCEFT ATCPA,LOISIZEC-LTIVALIDATECUALFHA.TIGIT,.”.="dEDRUCK$ 

880 OFEN *L:DRUCK$ 

890 CALL CLEAR =: CALL CHARSET sr CAll DELSFRITE(#I) 

900 FÜR I=START TO ENTE STEP 2 

910 CALL PEERCCOMFL2,HIEYTE.LORYTE) 

920 WÜRD=HIRYTERZS6+LORYTE 

930 IF WORTC3?748 THEN NEGWORT=WORDL ELSE NEGWÜRT=WORT-65536 

940 DUTSEHEXUSCT IR” "&HEXUECWÜRTD AT 

950 STARTCMD=T 
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960 I Fseudo-Befehl NOF xx 

970 IF WORT=4096& THEN OUT$=0UT$&”NOP” a2 GOTO 1270 
980 ! Format 1 MMMMHMEREHIeH 

990 IF WÜRTI18383 THEN 1480 

1900 ! Format Za KratukunaEH% 

1010 IF WORII>4095 ANTı WORU<7424 THEN 1570 

1020 ! Format 2b were . 

1030 IF WORT>7423 AND WORTT8192 THEN 16440 

1040 ! Format 3 met 

1050 IF WORT>81971 ANTI WORIICA11244 THEN 165970 

1060 ! Format 4 KRMRKMEKMMIRIH 

1070 IF WORL?12287 ANT WORT<A433& THEN 1770 

1080 ! Format 5 XXXXKHKERERR 

1090 IF WORTIP2047 ANL WORTIK307? THEN 1850 

1100 ! Format 4 RW EI 

1110 IF WORIY10?23 ANT WORL<2O48 THEN 1910 

1120 ! Format 7 RUM . 
1130 IF WORU=832 OR WORT=864 OR WORT=89% THEN 1970 
1140 IF WORD=928 OR WORT=9&40 OR WORTI=992 THEN 1970 


1150 ! Format Sa Meamiemaeiıcı 

1160 IF WORU>SA11 AND WORD<A7?2 THEN 2050 
1170 ! Format Bb wear 

1180 IF WORL=7364 OR WORT=768 THEN 2120 

1190 ! Format Bc warnen 

1200 IF WORU>671 AND WORIK720 THEN 2180 
1210 ! Format 9a MW 

1220 IF WORTIH112683 AND WORTKL??88 THEN 2210 
1230 I! Format 9b warmen! 


1240 IF WORDT>14335 AND WORTT16384 THEN 2780 

1250 ! TATA-Befehle era 

1260 QUT$=0UTS&R’DATA >”ÄHEXUSCWORTD 

1270 CALL HCHAR(24,1,ASCCOUTS)) 

1280 CALL. HCHAR(24,2,ASC{SEGS(OUTS,2,1))) 

1290 IF LEN(COUTS)<C31 THEN FRINT SEG$(OUT$,3,255):: GOTD 13660 

1300 FRINT SEG$S(OUT$,3,28) 

1310 CALL HCHAR(23,31,ASCSEG$LOUTS,31,1)&” *).) 

1320 CALL. HCHAR(23,32,ASC(SEGSCOUTS,32,1)&” 3) 

1330 IF LEN(DOUT$)<33 THEN 1360 

1340 FRINT =: FOR K=33 TO LEN(OUT$) 

1350 CALL HCHAR(23,K-17,ASC(SEGS(OUTS,K,1)))z2 NEXT K 

1360 IF FILE=1 THEN FRINT #1:0UT$ 

1370 X1=STARTCML+2 2» IF X1)32767 THEN Xi=X1-6553& 

1380 X2=COMFI? 

1390 FOR J=X1 TO X2 STEF 2? 

1400 CALL FEEK(J,A,B) 

1410 FRINT TARt4) sHEXUSCAR?SA+R) 

1420 IF FILE=1 THEN FRINT #1: TAR(4) cHEXUSCARDSS+R) 

1430 NEXT J 

1440 NEXT I 

1450 FRINT 2: DISFLAY BEEFS”’FERTIG-EITTE SPACE DRUECKEN!”® 

1460 CALL KEY(O,K,S)zs IF KC)32 THEN 1460 ELSE 630 

1470 1 FORMAT 1 A838 a6 ae ae ae He ae ae aa at Ma HA NE MAR BEE HE EEE EEE BA EIERN 
1480 OQUT$=0UT$AFM1LSCINTCWORT/4096)-4)&” ” 

1490 DNESTINATION=15 ANDLCINT (WORI/S4)) 

1500 SQURCE=15 AND NEGWORTD 

1510 TYPEDEST=3 ANLCINT(CWORI/1024)) 

1520 TYFESOURCE=3 ANI“ INT (WORIL/16)) 

1530 CALL DECOTECSOURCE, TYFESOURCE,I,”8”,0UT$)! SUR "OPERANDEN DEKOIIEREN” 
1540 CALL DECODECDESTINATION,TYFEDEST,I,"I” ,OUT$)! SUR "OFERANDEN DEKODLIEREN”? 
1550 GOTO 1270 

1560 1 FORMAT Da aaa ae ae de a6 ed HINEIN NENNE HEN HEINE NENNEN HEINE IEIE IHM III I III II III IEHEIEN 
1570 OUT$=0UT$AFM2$CINTCWORI/256)-16)&” ” 

1580 DISFLACE=LORYTE*? 

1590 IF DISFLACEI2S5S THEN DISFLACE=DISFLACE-51? 
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JUMFADLUR=I+LISPFLACE+2 
IF JUMFALTR=112 THEN OUTS=UOUTSAR”’NEXT” 22 GOTO 1270 
ODUT$=OUTS&R’)"&HEXWSECJUMFADDR I) 22 GOTO 1270 
! FORMAT 2b EHE ad Sea EHE IE EEE ee EEE TEE DEI IE IE IE NEIN IE MI III ICH ICH IIKMUKIKMEHKIIH 
QUT$=OUT$AFM2$CINTCWORU/PESI 16)” " 
WORTD=WORT: ANIı 255 
IF WORI<A128 THEN OUT$=0UTSARSTR$ (WORTDELSE OUT$S=ZUOUT$RSTRE CWORU- 256) 
GOTO 1270 
! FORMAT 3 KRIKKERERERUIHTEI HI HER IKAHIERUN REN IEHIEIHICHNKAEENAUHERKERKKAHKKÄÜRINH 
QUTS=OUTSAFM3SCINTCWORTI/LOZAI- BIER” " 
TYFESOURCE=INT (WORD /LA)ANL 3 
SOURGCE=NEGWORL ANIL 15 
CAll. DECODE<CSOURCE, TYFESOURCE,.I,”75”,Q0UT$)! SUR ”OPERANDEN DEKODLIEREN” 
DESTINATION=INT (WORL/S4# AND 15 
OUT$=-0UT$&’R’&ASTR$CDESTINATIOND 
GOTO 1270 
I FORMAT 4 ERKRATH EEE IHN UI NEEEIEHEIEI II MIETE MIMIK EMI III 
DUTS=-OUTSAFMASCINTCWORLZ/I DD A III” 
TYFESUOURCE= INT CWORTIZ/IGIANG 3 
SQOURGE=NEGWORT ANLI 15 
CALL. DECODECSOURCE „ TYFESQURCE ,T,*5” ,DUT$) 1 SUR "OFERANDEN DEKOUIEREN” 
CRULINE=INT CWORTIZ6H4 I ANTI 15 
QUT$=QUT$ASTR$ (CRULINE) 
GOTO 1270 
! FORMAT 5 ME aR a EMMEN EHE IE HEN NENN MEINEN NIE NN IM IE HEHE NENNEN NIE HEN HEN IHENNENEICHI IM IER 
QUT$S=-0UT$AFMS$CHIRBYTE-B)A” ” 
REGISTER=LURYTE ANU 15 
SHIFTCOUNT=INT<LORYTE/LSIANI 15 
OUT$=0UTS&R"’R’&LSTRSCREGISTER TR” „"&5STR$CSHIFTCOUNT) 
GOTO 1270 
! FORMAT 45 MRRHHTIHR III HAIE III HER ICH EHI NIENIIICH ICH FI NH IHR KKKIIRH 
QUT$=-0OUTSARFMASCINTCWORT/HAI LH)” 7 
TYFESOURCE=INTWORT/LSIANGI 3 
SOURCE=WORT ANTı 15 
CAl.. DECODE (SOURCE ,TYFESOURCE ,„I,”U”,0OUT$)! SUE ”OFERANDEN DEKOLIEREN” 
GOTO 1270 
! FORMAT 7 RE RRIEIIERHUEIEIIEHREHIEIIICRUEU III UICK IE IER UI IRINA IE HEIKE NER RK 
WORTL=832 THEN OUT$=-OUT$&”’IDLE?” 
WORTI=864 THEN OUT$=OUT$&R’RSET?” 
WORL=896 THEN QUT$=-0UTSAR”’RTUF” 
WORTL=928 THEN OUT$=QUTS&R”’CKON?” 
WORTI=940 THEN OUT$=0UT$&”’CKOF?” 
WORU=992 THEN QUT$=0UT$&R”’LREX?” 
GOTO 1270 > 
ı FORMAT Ba REIKI IE IICM NENNEN IE NIE N NEICH IE NIE IE HINEIN IE ICH IHRE HEINRICH 
QUT$=0UT$&FMBS INT CWORTI/32I-16)&”  ” 
REGISTER=NEGWORT AND 15 hr 
OUT$=-0OUT$&R"’R’ASTR$ (REGISTER) 
CALL DEEK(I,IMMEDLIATE) 
OUTS=0UT$&” ,„>”’&HEXWS(IMMELTATE) 
GOTO 1270 
I FORMAT Bb Heer de HE HE EEE NIE NEN TEICHE III INNEN IEHE NEHME ICH ICH IE HEHE NE INNE HEINE IE IE MI MIEIICI NER 
CALL DEEK(I,IMMEDLTATE) 
IF WORI=734 THEN OUT$S=0OUT$AR”’LWFI >P&HEXWSCIMMERIATE)SS CALL LABEL(I,OUT$):: 
GOTO 1270 - 
OUT$=0UT$&R”’LIMI "ASTRSCIMMELIATE)2s GOTO 1270 
! FORMAT BC KREIEREN HMI UKRAINE HAEREKERKIEHARAKKERIRKR 
IF WORI<704 THEN OUT$=0UT$&"STUF” ELSE OUT$=0DUT$&”’STST” 
REGISTER=NEGWORL ANTı 15 
OUT$=0UT$&” R’&ASTR$(REGISTER) 
GOTO 1270 
I FORMAT 9a RM II MICHI ICHE MICH MH IE NEHM NEHEIEHE MEINE IE NEE IE IE NEE MIEHE MI MMIEHE III NEIN III 
OQUT$=OUT$&R”’XOF  ” 
SOURCE=NEGWORT ANTI 15 
TYFESOURCE=INT (WORD /1S I) ANT 3 


- 
j 
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2240 CALL DECODLE (SOURCE, TYFESOURCE ,I,*”5”,0UT$)! SUR "OFERANDEN DEKODIEREN” 

2250 DESTINATION=INT<(WORT/64)ANI 15 

2260 OUT$=UUT$ASTR$SCDESTINATION):SS GOTO 1270 

2270 1 FÜRMAT Pb aaa kann ran: EEE 
2280 IF WORT<15380 THEN OUT$=0DUTSAR”’MFY ” ELSE OQUT$=QUT$A’IEIV  * 

2290 SOURCE=NEGWORD ANlı 15 

2300 TYFESOURCE=INT (WORT /1S)ANT 3 

2310 CALL DECODE(SOURCE,TYFESOURCE,I,”5”,0UT$)! SUR "OPERANTEN DEKODIEREN” 

2320 DESTINATION=INT(WORT/64 )AND 15 

2330 QUT$=OUT$A’R’&STRSCDESTINATION):: GOTO 1270 


Dede. en Be 12 212 2 212 12 202 272 27202 212027202 272 27227 Z12 272 ZT z7z Terz 272 ET Erz Erz ETz 727 Z72 ZU ErE ETETEnE ET Erg EVETENETENETEVEVEVEEVEVEVEVENEN? 
2350 1 UNTERFROÜGRAMME 3838er ar at an at ad 36 a6 dc Mae DEE HEN IHN NEE HE HEN MINE BEN IEHC HEHE AH NEAEIENIE IE HE 
230 1 Me HEäk de de de Hd de DE ae DEE Added DEE AA de BEE HEBEN NIE HEN NE 
2370 ! Adressierungsart dekodieren mm mm mm m mm me an man mn am nn 


2380 SUR DECODE<(OFERANI,TYFE,I,ST4$,OUT$) 

2390 DEF COMFL2=1+r65536% 13327657) 

2400 ON TYFE+1 GOTO 2420,2440 ,2460 , 2550 

2410 ! #*-x* WORKSFACE REGISTER %#-* E 

2420 ODUT$=0UT$&”’"R’&ASTR$(OFERANI) zn GOTD 2560 

2430 ! *-* WORKSFACE REGISTER INIIRECT %*-x 

2440 OUT$=0DUTSA’RR’ASTRELOFERANI) 2: GOTO 25640 

2450 I! *-x* SYMEOLIC MEMORY/INDEXEDL MEMORY #-% 

2460 I=I+?2 =»: CALL FEERCCOMFL?,.A,R) 

2470 HX$="0123456789AEBCDEF” 

2480 HX1$=SEG$ (HX$ ,INT(A/16)+1,1)8SEGSCHX$ „A-INTCA/I6)R16+1,1) 

2490 HX2$=SEG$ CHX$,INT(B/16)+1,1) ASEGSCHX$ ,E-INT(B/16)#16+1,1) 

2500 IF OFERANIK>O THEN 25720 

2510 OUT$=0OUT$ACHR$ (54) RK” I PAHXISEHX2$ 22 CALL LABELCI,OUT$)2z GOTO 2560 
2520 DUT$=OUT$ARCHRS (654) RK" I PAHXLISAHX2S 28 CALL LABEL(CI,DUT$) 

2530 OUT$=0UT$&”CR”’&STR$COFERANUI&”)” »3 GOTO 2540 

2540 ! *-%* WORKSFACE REGISTER INDIRECT AUTO-INCREMENT %*-% 

2550 OUT$S=OUTSR’RRK’ASTRE COFERANI) &”+” 

2560 IF Sb$=”"5”' THEN OUT$=0UT$&”,” 

2570 SUBENI 

2580 ! Tloouble Feek (16-Eit-Wort lesen) mm me nn men mn men un m nn nn 
2590 SUR DEEK(I,„C) 

2600 I=I+2 :: COMPL2=1+65536%01)32767) 

2610 CALL. FEERCCOMFL2,A,E) 

2620 C=zARr2564+B 32 SUBENI 

2630 ! Adresse durch Label ersetzen en non mu m m 
2640 SUE LABEL(I,OUT$) 

2650 IF FLG THEN 26490 ELSE FL6G=-1 

2660 RESTORE 370 »» DIIM LABEL$(1,255) 

2670 FOR J=0 TO 40 »= REAL ADR,LABELS(O,AUR)ss NEXT J 

2680 FOR J=0 TO 11 2: Alk=J%4+8 »=2 READ LABEL$(1,AIR)nn NEXT J 5 
2690 CALL FEEK(CI,A,E) 

2700 IF Ar256+E=112 THEN OUT$=SEG$(0OUT$,1,LENCOUTS)I-S)&”NEXT” 22 SUBEXIT 
2710 IF A<>131 THEN 2740 

2720 IF LABEL$(0,EB)C)”” THEN OUT$=SEG$(OUT$,1,LEN(COUT$)-S)&LABEL$(O,EB) 
2730 SUBEXIT 

2740 IF A(>32 THEN 2760 

2750 IF LABEL$(1,EB)C>”” THEN OUT$=SEG$(OUT$,1,LENCOUT$)-5)ALABELS$(1,E) 


2760 SUBENI! 
2770 ENT 1 3836 ae ae de ae He HH HH IC HE HEHE HEINE INH H HEN IEIEIENI NENNEN IH NINE IH IEIEN HH ICH INN ICHIEIHIN HIHI HIEIEN 


EEE NE N N IE 
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Computer-Messen ’85 


30. 8.- 8. 9.85 


24. 9.-27. 9.85 
Oktober 

9. 10.-13. 10. 85 
9. 10.-14. 10. 85 
17. 10.-20. 10. 85 
28. 10.- 1. 11.85 
12. 11.-16. 11. 85 


Tips & Tricks 


Computermessen im Ausland 
SICOB/Paris 
PCW/London 

Data - Internationale 
Messe für Computer und 
Büro-Rationalisierung 
COMDEX/Las Vegas, 
USA 

ELKOM - Internationale 
Elektronik-Ausstellung/ 
Helsinki 

ELFACK - Internationale 
Elektronische Messe/ 
Göteborg 


Internationale Funkaus- 
stellung Berlin 
CAMP/Computer 
Graphics/Berlin 

EL-FA Elektrotechnische 
Fachausstellung/Berlin 
Hobby-Elektronik 85/ 
Stutigart 

Frankfurter Buchmesse 
CFA - Commodore 
Fachausstellung/Frankfurt 
SYSTEMS 85/München 
PRODUCTRONICA 
Intern. Fachmesse 

für die Fertigung 

ın der Elektronik/München 


September 85 
18. 9.-22. 9.85 
26. 9.- 2. 10. 85 


Oktober 85 


November 85 


5. 11.-8. 11. 85 


Herausgeber des auf Seite 17 vor- 
gestellten Mailbox-Buches ist 


Claus Warneke, Kirchhuchtinger 
Landstr. 243, 2800 Bremen 66 


| ® ® .. 

Tips und Tricks für den CPC-464 
100 n=12345 

110 at=DEC# ((n,"#HHHHH. HH") 

120 FRINT af 

150 REM FORMATIEREN VON ZAHLEN FUER STRINGS MIT DEM CFC484 
140 REM ZSZZZZZEESS22Z2Z22222 22225222 2gsmemmsmeemememememmene 
150 REM 

160 REM Das Formatieren von Zahlen bedeutete immer dann 
170 REM einen Frogrammieraufwand, wenn die Zahlen in 

180 REM Strings umzuwandeln waren, im Gegensatz zur 

170 REM formatierten Ausgabe in der PRINT-Anweisung 
'200 REM mittels FRINT USING. Der CFC484 besitzt einen 

210 REM entsprechenden Formatierbefehl fuer Zahlen. | 
220 REM Allerdings enthaelt der Aufruf einen Schoenheits- | 
230 REM fehler, vermutlich der Grund, warum diese Funktion 
240 REM nicht im Benutzer-Handbuch beschrieben wurde. 

250 REM 

260 REM Der Aufruf geht wie folgt: 

270 REM DEC#((<Ausdruck?, "Formatierungszeichen") 

280 REM wobei zu beachten ist, dasz 

290 REM 1. hinter DEC# eine zusaetzliche Klammer (der 

300 REM "Schoenheitsfehler") stehen musz, die auch 

310 REM nicht mehr zugemacht werden darf, | 

sSZO REM Z. im Formatierungsstring keine BLANKS, d.h. also 
530 REM nur. die Zeichen "47,74, "=7,”." und "= ‚ent- 
540 REM halten sein duerfen. 
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TRONIC-SOFTWARE-SERVICE 


Atari, 
genkrieg, Kassette 
stell-Nr. 141 


Tank-Battle/Oil Panic, Kas- 
sette 12,50 DM, Bestell-Nr 
151 ö 


Startup/Zeilen-Split/Tom- 


stone-City, Diskette 19,50 | 


DM, Bestell-Nr. 171 


Painter/Hardcopy, Kasset- 
te 14,— DM, Diskette 19,50 
DM, Bestell-Nr. 181 


The Big Quest/Fünf ge- 
winnt, Kassette 14,- DM, 
Diskette 19,50 DM, Bestell- 
Nr. 191 


Splitt, Kassette 11,- DM, 


Diskette 17,50 DM, Bestell- | 


Nr. 1101 


Ski/Mutation, Kassette 
14,50 DM, Diskette 19,50 
DM, Bestell-Nr. | 121 


Super Miner/Diamonds, 
Kassette 14,50 DM, Disket- 
te 19,50 DM, Bestell-Nr 
122 


Donkey Kong/Kerzenheinz, 
Kassette 16,50 DM, Disket- 
te 19,50 DM, Bestell-Nr. 
1 32. 


TI-99, Drei-Kronen-Spiel/ 
Zahlenputzen, Kassette 
8,50 DM, Bestell-Nr. T 41 


Karl der Käfer/Alien-Lan- 
ding, Kassette 14,50 DM, 
Bestell-Nr. T 51 


Jack the Digger I/Noah 
2099, Kassette 14,50 DM, 
Bestell-Nr. T 61 


Lift Bär/ASC II DEF Teil 1, 
Kassette 14,- DM, Bestell- 
Nr. T 71 


Maya/ASC II DEF Teil 2, 
Kassette 14,50 DM, Be- 
stell-Nr. T 81 


ASC II DEF Teil 1 + 2, Dis- 
kette 19,50 DM, Bestell-Nr. 
T 881 


Transfer/Silverspar, Kas- 


sette 14,50 DM, Diskette 
19,50 DM, Bestell-Nr. T 91 


Mother Duck/Screen Desi- 
gner, Kassette 14,50 DM, 
Diskette 19,50 DM, Bestell- 


Nr. T 101 
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Mastermind/Schlan- | 
10,50 | 
DM, Diskette 19,50 DM, Be- | 


Cave Man, 
DM, Diskette 11,50 DM, Be- 
stell-Nr. T 121 


Moon Race/Frogger/Slicks, 
Kassette 19,50 DM, Disket- 
te 25,50 DM, Bestell-Nr. 
T22 


Panzerschlacht, 


Bestell-Nr. T 32 


derstand, Kassette 8- DM, 
Diskette 15,-— DM, Bestell- 
Nr. C 41 


Space-Comets/Erdspalte 
Sprite-Data, Kassette 15.- 


DM, Diskette 23,50 DM, Be- 


stell-Nr. C 51 


Autostart/Bestellschein/Ro- 
adpainter, Kassette 16,50 
DM, Diskette 23,50 DM, Be- 
stell-Nr. C 61 


Hardcopy/Space-Fighter, 
Data-Generator, Kassette 
15,50 DM, Diskette 19,50 
DM, Bestell-Nr. C 71 


Monster-Attack/Block-Pain- 
ter/Epson-Drucker, Kasset- 
te 16,50 DM, Diskette 
23,50 DM, Bestell-Nr. C 81 


Projekt/Datenbank, Kasset- 
te 16,- DM, Diskette 23,50 
DM, Bestell-Nr. C 91 


Spiders/The Basic, Kasset- 
te 16,50 DM, Diskette 
23,50 
C 101 


DM, Bestell-Nr. 


High Noon/Skeet/Grafik-De- 
Signer, Kassette 17,50 DM, 
Diskette 23,50 DM, Bestell- 
Nr. C 121 


Painter/Star-Baddle/Editor, 
Kassette 17,50 DM, Disket- 
te 23,50 DM, Bestell-Nr 
22 


Kassette 8- | 


Kassette | 
8,- DM Diskette 11,50 DM, ı 


Commodore 64, Mauern/Wi- | 


Wüstenrallye/Jet-Pac/Black | 


Moore Castle Kassette 
17,50 DM, Diskette 23,50 
DM, Bestell-Nr. C 32 


VC-20, Bestellschein/Glük- 


ky, Kassette 8,50 DM, Dis- 
kette 15,- DM, Bestell-Nr 
V61 

Multigraph/All 
Kassette 11,- DM, Diskette 
15,50 DM, Bestell-Nr. V 71 


Zyklo/Meteorit, 
11,- DM, Diskette 
DM, Bestell-Nr. V 81 


Garten/Schloß Gruselstein, 


19,50 


Kassette 14,— DM, Diskette | 


19,50 DM, Bestell-Nr. V 91 


Fressman/Outlaw, Kasset- 
te 14,— DM, Diskette 19,50 
DM, Bestell-Nr. V 101 


Prost/Buffalo Bill, Kassette 
14,- DM, Diskette 19,50 
DM, Bestell-Nr. V 121 


Joy Man/Powerpack, Kas- 
sette 14,- DM, Diskette 
19,50 DM, Bestell-Nr. V 22 


Der rasende Malocher/ 
Frankie goes to Pharao, 
Kassette 14,-— DM, Diskette 
19,50 DM, Bestell-Nr. V 32 


Apple Il, Wilder Westen/Ka- 


rambolage/Maskengenera- 
tor, Diskette 19,50 DM, Be- 
stell-Nr. A 41 


Music-Maker/Mission: Ad- 
ler/Disk-Kata-log, Diskette 
19,50 DM, Bestell-Nr. A51 


Snake/Super Datei/Shape- 
tables, Diskette 19,50 DM, 
Bestell-Nr. A 61 


Library/Fight, Diskette 
19,50 DM, Bestell-Nr. A 71 


Reversal/Disk-Menue-Ge- 
nerator, Diskette 19,50 DM, 
Bestell-Nr. A 81 i 


Diamonds/Hilfsprogramm, 
Diskette 19,50 DM, Bestell- 
Nr. A 91 


Tic-Tac-Toe/Jumper, Dis- 
kette 19,50 DM, Bestell-Nr. 
A 101 


Donovan/Basic-Konverter, 
Diskette 19,50 DM, Bestell- 
Nr. A 121 


Funktionstasten/Painter/ 
Bowling, Diskette 19,50 
DM, Bestell-Nr. A 22 


Thunder/Castle of Doom, 
Diskette 19,50 DM, Bestell- 
Nr. A32 


Dragon 32, Blizzard, Kasset- 


te 8,- DM, Bestell-Nr. D 41 


Space-Flight/Geosoft, Kas- 
sette 10,- DM, Bestell-Nr 
D51 


Rammer, | 


Kassette | 


Waregames, Kassette 8,50 
DM, Bestell-Nr. D 61 


Laser-Attack, Kassette 
8,50 DM, Bestell-Nr. D 71 


Hardcopy, Kassette 13,- 
DM, Bestell-Nr. D 81 


Anwenderprogramm, Kas- 
sette 10,- DM, Bestell-Nr 
D91 


Dragon Paint, Kassette 
14,- DM, Bestell-Nr. D 101 


ZX-Spectrum, Inventur, Kas- 


sette 12,- DM, Bestell-Nr 
S41 


Missile-Comment, Kassette 
8,50 DM, Bestell-Nr. S51 


Defender/Lui der Wurm/Al- 
ternativer Zeichensatz, 
Kassette 13,50 DM, Be- 
stell-Nr. S 61 


Matheprogramm/Bongo- 
Beecatcher, Kassette 
12,50 DM, Bestell-Nr. S 71 


Solitaire/Superstat/Klein- 
stes gem. Vielfache, Kas- 
sette 14,50 DM, Bestell-Nr. 


Jump about, Kassette 
14,50 DM, Bestell-Nr. S 91 


Pac-Man/Oil Panic, Kasset- 
te 14,50 DM, Bestell-Nr. 
S 101 


Frogger, Kassette 16,- DM, 
Bestell-Nr. S 121 


Jump, Kassette 14,50 DM, 
Bestell-Nr. S 22 


Jet Set Freddie, Kassette 
8,- DM, Bestell-Nr. S 32. 


ZX-81, 


Go-Ball/Grand-Prix, 
Kassette 10,- DM, Bestell- 
Nr. 251 


Moon-Crash/ZX-Draw, Dis- 
kette 10,- DM, Bestell-Nr. 
261 


Tonprogramm/Aldebaran, 
Kassette 10,- DM, Bestell- 
Nr. 2 71 


Reversi, Kassette 10,- DM, 
Bestell-Nr.Z 91 


Panik Labyrinth, Kassette 
10,- DM, Bestell-Nr. Z 101 


Expedition, Kassette 10.- 
DM, Bestell-Nr. Z 121 


Spinnen, Kassette 
DM, Bestell-Nr. Z 22 


Spukhaus, Kassette 14,50 
DM, Bestell-Nr 232. 


14,50 
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Keyboard Toolkit/Farbdeko- TI-99, Olympics, Kassette 11.- 


Commodore 64, Multi-Key/S- 
Tool 64/Interrupt-Programme, 
Kassette 16,- DM, Diskette 
21,- DM, Bestell-Nr. UC 2/85. 


Spritehilfe/Diskloader/Direc- 
tory, Diskette 21,- DM, Be- 
stell-Nr. UC 3/85. 


Tape-Directory/Asmon/Data- 
Generator, Kassette 15,- 
DM, Diskette 21,- DM, Be- 
stell-Nr. UC 3/85 
Fast-Load, Kassette 10,- 
DM, Bestell-Nr. UC 4/85. 


Diskmonitor/Zeichensatz, 
Diskette 20,- DM. Bestell-Nr. 
UC 5/85. 


Reassembler/Maskengenera- 
tor, Kassette 15,- DM, Dis- 
kette 20,- DM, Bestell-Nr. UC 
6/85 


Del 64/Treiberprogramm für 
1526/MPS 802, Decelerator, 
Kassette 14,- DM, Diskette 
19,- DM, Bestell-Nr. UC 7/85 


Schneider CPC-464, Autoren- 
nen, Kassette 11,- DM, Be- 
stell-Nr. US 3/85 


Universal-Dateı V1, Kassette 
9 - DM, Bestell-Nr. US 4/85 


Computerschrift/Symbol- 
Swap, Kassette 10,- DM, Be- 
stell-Nr. US 5/85 


dierung, Kassette 11,- DM, 
Bestell-Nr. US 6/1/85. 
Aladin, Kassette 9,— DM, Be- 
stell-Nr. US 6/2/85 

Painter/ Box-Befehl, Kassette 
14,- DM, Diskette 24,— DM, 
Bestell-Nr. US 7/85 


VC-20, Sprites/Space-Battle, 
Kassette 13,- DM, Diskette 
19,- DM, Bestell-Nr. UV 2/85 


Grafik-Painter, Kassette 10,- 
DM, Bestell-Nr. UV 5/85 


Vic-Clock, Kassette 9,- DM, 
Bestell-Nr. UV 6/85. 


Decelerator, Kassette 9,- DM, 
Bestell-Nr. UV 7/85 


Diskette 
UA 2/85 


Diskette 
UA 3/85 


Diskette 
UA 4/85. 


Apple, Asteroids, 
18,- DM Bestell-Nr 


Dateiverwaltung, 
18,- DM, Bestell-Nr 


Digiter/Reset-Saver, 
18,- DM, Bestell-Nr. 
Assambler-Monitor, Diskette 
17,- DM, Bestell-Nr. UA 5/85 
Disk Check IC/Dos Change, 
Diskette 18,- DM, Bestell-Nr. 
UA 6/85. 

Hello, Diskette 17,- DM, Be- 
stell-Nr. UA 7/85. 


DM, Bestell-Nr. UT 2/2/85. 


Funktionsanalyse/Hardcopy 
Kassette 11,- DM, Bestell-Nr 
UT 3/85 


Invaded by the Empire, Kas- 
sette 11,- DM, Bestell-Nr. UT 
4/85 


Multicolor/Load-Programm, 
Kassette 14,- DM, Diskette 
19,- DM, Bestell-Nr. UT 6/85 


Disassembler, Diskette 19,- 
DM, Bestell-Nr. UT 7/85 


ZX-Spectrum, Panık Sam/Co- 
lour Change/Clock, Kassette 
13,- DM, Bestell-Nr. UZ 2/85. 


MC-Routinen/Data-Base/Pi- 
xel, Kassette 11,- DM, Be- 
stell-Nr. UZ 3/85 


Revers//UDG-Editor, Kassette 
15. - DM, Bestell-Nr. UZ 4/85 
Star-Basic, Kassette 193,- 
DM, Bestell-Nr. UZ 5/85 


Fill-Programm/Copy it, Kas- 
sette 14,- DM, Bestell-Nr. UZ 
6/85 


Quassi, Kassette 13,- DM, Be- 
stell-Nr. UZ 7/85. 


ZX-81, The Castle of Question- 
mark, Kassette 10,- DM. Be- 
stell-Nr. UX 2/1/85. 


Atari, Mauerflucht/Lunar-Simu- 
lation, Kassette 13,- DM, Dis- 
kette 19- DM, Bestell-Nr 
UI 2/85. 


CPU Bestellkarte-Softwareservice 


Alle im Heft abgedruckten Programme können als zusätzlicher Service über den Verlag bezogen werden. 
(Ausland nur gegen Vorkasse) 


Die Zustellung erfolgt: gegen Vorkasse U 


innerhalb von 1 Woche 


Zeicheneditor, 


Ram-Tester/Cherry-Harry, 
Kassette 13,- DM, Diskette 
19,- DM, Bestell-Nr. Ul 3/85. 


Crazy Egon, Kassette 13,- 
DM, Bestell-Nr. UI/85. 


Monitorprogramm, Kassette 
11,- DM, Bestell-Nr. UI 6/85. 


Diskette 
DM, Bestell-Nr. UI 7/85 


19,- 


MSX, Zeichensatzkonverter, 
Kassette 10,- DM, Bestell-Nr 
UM 3/85 


Zirkus, Kassette 13,— DM, Be- 
stell-Nr. UM 5/85 


Pipeline, Kassette 13,- DM, 
Bestell-Nr. UM 4/85 


Alien Attack, Kassette 
DM, Bestell-Nr. UM 7/85 


13,- 


Bestellung per Telefon: 


Wenn es schnell gehen 
soll ... rufen Sie uns an. Wir 
nehmen Ihre Bestellung 
gern entgegen. 


Tel.-Nr. 05651/40693 
oder 0 56 51 / 406 43 


Tronic-Verlag 
Postfach 41 
3444 Wehretal 1 


oder Inland per Nachnahme U 


+ Versandkosten 


Entnehmen Sie bitte aus unseren Preislisten die notwendigen Angaben für Ihre Bestellung: 


Bitte liefern Sie mir: 


U Cassette für 
Diskette für 


zum Preis von gesamt 


U Anzahl 


System 


U Anzahl 


System 


DM 


Name/Vorname 


Straße, Nr 


PLZ/Ort 
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„Decelerator 64/20“: 
UTILITY für den C-64 / VC-20 


Die Anwendungsmöglichkeiten von Decelerator 64/20: 


Alle Computerfreaks, die 
schon einmal mit der Sprache 
Latein konfrontiert wurden, 
werden beim Lesen des Titels 
schon den Zweck des Pro- 
grammes erkennen und mit 
froher Erwartung sofort den 
Commodore starten und das 
Programm eintippen. Für 
den Rest der Leser seı gesagt, 
daß man mit Decelerator die 
Exekution von jeglichen Be- 
triebssystemroutinen, jegli- 
chen Basicprogrammen bzw. 
Complicaten von z. B. Pet- 
speed, Austrocompiler und 
vielen  Maschinencodepro- 
grammen beliebig verlangsa- 
men kann. Weiterhin kann 
man diese Programme an je- 
dem beliebigen Punkt anhal- 
ten und später genau an die- 
ser Stelle mit dem Programm 
fortfahren. Dies gilt auch für 
Programme, beı denen die 
RUN/STOP-Taste abge- 
schaltet ist. 

So kann man endlich die schr 
schnellen Arcadegames mei- 
stern oder der Versuch, den 
Ultimate-High-Score zu er- 
langen, scheitert nicht am 
Schellen des Telefons. Aber 
auch für andere Anwender 
bietet Decelerator neue Per- 
spektiven, z.B. kann man mit 
der Hilfe von Decelerator die 
Programme endlich mit einer 
sinnvollen Geschwindigkeit 
auf dem Bildschirm listen, so 
daß die Fehler nicht wie sonst 
schon vor ihrer Entdeckung 
weggescrollt sind. Der hämi- 
sche can’t contiue Error ist 
vergessen, da das Programm 
nun immer wieder gestoppt 
und gestartet werden kann. 
Selbst für den Maschinen- 
sprachecrack bietet Decelera- 
tor ungeahnte Möglichkeiten, 
endlich kann er die einzelnen 
Stufen der viel bewunderten 
Sprite-Animation erkennen 
oder ohne langes Hacken den 
Frequenzgang der Spitzen- 
soundeffekts erkennen. 

Ein weiterer Pluspunkt von 
Decelerator ist die Compati- 
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bilität mit wichtigen Utilities 
wie  Fastloadern, Turbo- 
Tape, Turbo Il, Speed-Load. 
Diese Utilities laufen ohne 
Schwierigkeiten. Externe-Re- 
sets übersteht Decelerator 
auch, so daß ein ständiges 
Reloading entfällt. 


Wie funktioniert jetzt 
eigentlich Decelerator? 
Decelerator verlängert ein- 
fach die Bearbeitungszeit der 
Interrupts, indem er, bevor er 
zur Interrupt-Betriebssy- 
stemroutine springt, einfach 
eıne WAarteschleife durch- 
läuft. Die Länge der Bearbei- 
tungszeit der Schleife kann 


durch Druck der „+*- und der | 


„“-Taste verändert werden. 
„+“ für ein schnelleres Tempo 
und „-“ für ein langsameres. 
Die Funktion von Decelera- 
tor setzt also den Aufruf der 
Hardware-Interruptroutine 

voraus. Leider gibt es aber 
den Maschinensprachbefehl 
SEI (Set Interrupt disable sta- 
tus), der jegliche Interrupts 
abschaltet, somit auch Dece- 
lerator außer Gefecht setzt. 
Aber keine Angst, so leicht 
gibt sich Decelerator noch 
nicht geschlagen. Es ıst näm- 
lich ein Befehl zum Wieder- 
einschalten der Interrupts 
implementiert. Der einmalige 
Druck der Restore-Taste (bit- 
te ohne Run/Stop) genügt. 
Decelerator macht sich hier- 
bei die Non Maskable Inter- 
rupts zunutze, die bei C-64 

VC-20 z. B. durch die Resto- 
re-Taste ausgelöst werden 
können. Diese Interrupts sind 
softwaremäßig nicht aus- 
schaltbar. Bei einem NMI 
springt der Prozessor zu einer 
Routine, die ihm durch die 
Vektoren $FFFA und $FFFB 
angegeben wird. Diese NMI- 
Routine muß also nur so ver- 
ändert werden, daß sıe das 
vor dem Interruptansprung 
auf den Stapel gesicherte Sta- 
tusregister zurückholt, einen 
CLI (Clear Interrupt disable 


bit) durchführt und darauf 


das Statusregister auf den | 


Stapel wieder zurücklegt. 
Decelerator verfügt zuzüglich 
noch über eine extra Stop-Ta- 
ste. Es handelt sıch dabei um 
die „£“-Taste. Diese Taste 
veranlaßt, daß der Computer 
nicht mehr aus dem Interrupt 
zurückkommt, sondern eine 
Schleife durchläuft. Diese 
Schleife kann nur durch den 
NMI unterbrochen werden, 
der eine Flag setzi. die den 
normalen Interrupt veran- 
laßt, die Schleife zu verlassen. 
Zur Fortsetzung des Pro- 
gramms muß deshalb wieder 
die Restore-Taste gedrückt 
werden. Falls die Tastatur da- 
nach blockiert sein sollte. 
hilft das Motto: 
besser. — Siehe da. alles wie- 
der beım alten.“ 


Die versionsspezifischen 
Merkmale von Decelerator: 
Es ıst wohl jedem klar, daß 
wegen des unterschiedlichen 
Aufbaues von VC-20 und C- 
64 gewisse Veränderungen 
bei der Realisierung des Pro- 
grammziels vorgenommen 
werden mußten. Der C-64 
bietet z. B. die Möglichkeit, 


das Betriebssystem ins Ram | 


zu verlegen, deshalb ist Dece- 
lerator 64 auch wesentlich 
complexer geworden und die 
C-64-Besitzer dürfen fast 
doppelt so viele der verhaß- 
ten Datas eingegeben. Ich war 
trotzdem bestrebt, das Pro- 
gramm so kurz wıe möglich 
zu halten, um den Eingabe- 
frust auf ein Minimum zu 
verkürzen. Deshalb sei auch 
gesagt, daß Rams weggelas- 
sen und Prints selbstver- 
ständlich verkürzt werden 
können. Decelerator verfügt 
über eine Data-Check- 
Funktion, die auf Data-Er- 
rors aufmerksam macht. 
Trotzdem ist es ratsam, das 
Programm vor dem RUN- 
Befehl abzusaven, da sonst 
evtl. das ganze Tippen um- 
sonst war. 


„2mal hilft | 


Decelerator 64: 

Die  Initialisierungsroutine 
kopiert zuerst das Rom ins 
Ram, schaltet dann das Rom 
aus und verändert das Be- 
trıiebssystem so, daß die In- 
terrupt- und die NMI-Routi- 
ne von Decelerator mit aus- 
geführt werden und außer- 
dem beim NMI nicht wie 
sonst zum Modulstart ge- 
sprungen wird. Decelerator 
kann nur durch den Poke 
1,55, der wieder das Rom ein- 
schaltet, oder durch ein 
Überschreiben seiner Routi- 
nen ausgeschaltet werden. 
Man kann also davon ausge- 
hen, daß die Programme, die 
mit Decelerator imcompati- 
bel sind, zur Programmsiche- 
rung solche Befehle enthal- 
ten. Den potentiellen Hak- 
kern unter den Lesern sollte 
es also nicht schwerfallen, 
zum Erlangen einer Compati- 
bilität diese Befehle mit Hilfe 
des Diskmonitors durch 
NOPSs zu ersetzen. 

Nach einem erfolgreichen 
Reset kann man Decelerator 
64 übrigens mit Poke 1,53 
wieder einschalten. 

Als letzter Tip sei gesagt, daß 
man beim Loading immer 
die normale Betriebssystem- 
geschwindigkeit verwenden 
sollte, da es sonst zu LOAD 
ERROÖRs kommen kann. 
Dies wird durch Druck der 
„+"-Taste erreicht, den man 
fortsetzen muß, bis der Cur- 
sor etwa wieder mit normaler 
Geschwindigkeit blinkt. 

Die Compatibilität von 
Decelerator 64: 

Zum Leid der C-64-Besitzer 
sei gesagt. daß Decelerator 20 
eine weit höhere Compatibi- 
ltätsquote hat, als die C-64- 
Version. Dies erklärt sich 
daraus, daß die Professionals 
es inzwischen besser gelernt 
haben, ihre Programme zu si- 
chern, und dazu auch sehr 
viel mehr Speicher auf dem 
C-64 zur Verfügung steht. 
Trotzdem läßt sich die Liste 
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der compatiblen Programme 
sehen. Sie ist bei weitem 
nicht vollständig, da nur ein 
Bruchteil der auf dem Markt 
befindlichen Programme ge- 


hingewiesen, daß einige Pro- 
gramme der Liste möglicher- 
weise bei verschiedenen Le- 
sern incompatibel sind, da 
die Firmen ihre Programme 


mit verbesserten Sicherungen 
dupliziert haben. 
Compatibel sind: 
Hunchback, Scramble, B.C.’s 
Quest for Tires, Attack of the 


ser-Strike, Mangrove, Trıiad 
64, Puckman, Pucman, Pe- 
destrian, Hyper-Hen, Don- 
key Kong Il, Pacacuda, Hex- 
pert, Crossfire, Gallaga, Trax, 


Mutant Camels, Matrix, Vor- 
] tex Raider, Gridrunner, La- 


manchmal im Nachhinein Helicommand, Burger- 


Crash, Jet Pac, Chaser etc. 


testet wurde. Es seı darauf 


16 REM BEETFEFTEEFEITERTE RR 28 

ı1 REM * * 

il KEN * VELELERATUR 64 * 

13 REM * * 

15 REM KRRRTERERFERFR FH FT 

16 REM * % 

17 REM % £C) 1985 % 

15 KEM # * 

13 REM * br * 

24 REM * * 

25 REM * EBERHARD AUST * 

zZ’ REM * % 

36 REM BEITPEITEITETERT ET ET ET 

8 FRINT"I-------------------- 2; 
88 PRINT" DECELERATOR 64 (C) 1384 Br E. AUST " 
85 FRINT"------------------ 27272700 "; 
44 KEM 

91 REM DbAIA EINLESESCHLEIFE i 

92 KEM 

186 FÜRA=8TÜ1B1 :REALE:FRF=FPRF+E: POKER+6088, EB: NEXT 


156 IFPRF<>13343THENPRINT"MDATA ERROR IN VWORBEREITUNGSROUTINE" END 

136 REM 

131 REM DATA EINLESESCHLEIFE 2 

132 REM 

266 FÜRR=8T0122: KERLE: ARF=ÄRF+B: FÜKER+S3063,, B: NEXT 

258 IFARF<ZIEBSSTHENFRINT" DATA ERROR IN HAUFTROUTINE" END 

386 PRINT" AM DATAS OKAYM" 

365 REM 

366 REM STARTEN LER VÜRBER.ROUTINE 

367 REM 

31 5Yr36068 

315 PRINT" N 

317 PRINT 

326 PRINT"SCHALTEN SIE NUN DECELERATOR DURCH DRUCKVYON RUN/STOF UND RESTORE EIN" 
323 PRINT 

325 PRINT!" ——————————————— nn nl 

338 GOTO33B8 

1868 KEM 

1061 REM YORBERE ITUNGSROUTINE 

1662 REM 

1818 DATA168, 158, 162,8, 148, 124,23, 148, 127,23, 189,8,191,157,98,191,232,224,08 
1628 DRiH24B8, 3, 76,122, 23,268, 192, 192,248, 3,76,116,23. 168: 224, 162,8,148, 156,23 


1836 DATR148, 153,23, 189,8, 225, 157,8, 225, 232, 224,0, 248,3, 76,154,23 
3 DATA288, 192,8, 248,3, 76, 148,23, 169,229, 141,214, 253, 169, 76,141.69, 254,169 
1858 DATA71,141,69, 254, 169, 207,141, 70,254,169,234,141,91,254,141,92, 254, 141 


1868 DATAY3, 254,128, 169,53,133,1,393,96 

2008 REM 

2841 KEM HAUFTRUUTINE 

eu82 REM 

2818 DATA163,46, 133,255. 40, 88,8, 128, 169, 76, 141,49, 234,169,53,141,1,8,163 
2826 DATALBB, 141,58, 234,169, 267,141,51, 234,76, 71,254,0,0,0,8,6,8 

zu38 DATA169. 255, 141,2, 226, 165,197, 201,48, 268.18. 174,168,207.224,0,240,3 
2846 IRIAZB6E, 160, 207, 281,43, 208, 18, 174, 168, 207 , 224, 255: 248: 3, 238, 160,207 
2058 DATAZB1.48. 288,18, 165,255. 261,46, 240, 3,76,147.207.234.162,0,224,0,208 


2068 DATA3, 76, 134,287, 16%.8. 208, 192,48, 248, 3,76. 168, 207,232, 76,159, 207 


2678 DATAB, 8,8, 234, 163,8, 133, 255, 32, 234, 255, 76,52, 234 
3uoB REM 

3616 REM ENDLICH GESCHAFFT I 

3828 KEM 
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Decelerator 20: 

Decelerator 20 läuft auf dem 
VC 20 mit einer 8K- oder 
einer 16K-Ram-Extension. 
Er bietet die Möglichkeit, 
Programme, die für die 
Grundversion (3.5K Ram) 
oder für den mit 8K Ram er- 
weiterten Computer geschrie- 
ben sind, auszuführen. Die 
Grundversion wird initiali- 
siert, wenn die Frage, ob die 


Speichererweiterung ausge- 
schaltet werden soll, mit „J“ 
beantwortet wird. 

Da eine Modifikation des Be- 
triebssystems auf dem VC-20 
wegen des Ram-Mangels 
nicht möglich ist, werden die 
Routinen von Decelerator 
durch Veränderung des 
Hardware-Interrupt-Vektors 
($314-$315) und des NMI- 


18 REM ee 


Vektors ($318-$319) aufge- 
rufen. Diese werden aller- 
dings nach dem Druck von 
RUN/STOP + RESTORE 

wieder auf ihre normalen 
Werte gesetzt, so daß Decele- 
rator durch Eingabe von SYS 
15310 neu initialisiert werden 
muß. Auch nach externen 
Resets kann Decelerator 


| durch diesen SYS neu gestar- 


tet werden. 

Bitte beachten Sie auch bei 
Decelerator 20, daß beim 
LOADING möglichst Nor- 
maltempo gewählt werden 
sollte. 

Die Compatibilität von 
Decelerator 20: 

Hier verliefen alle 3.5K- 
Ram-Tests positiv. Getestet 
wurden z. B. Mad-Painter, 


Frogger, Earth Defense, Hell 
Driver, Exterminator, 
Scramble, Fire, Bounce-Out, 
Pacer, Pit, Blockade etc. Die- 
se Liste könnte beliebig 
fortgesetzt werden. 

Die meisten Programme mit 
8K-Ram-Extension laufen 
ebenfalls, nur solche, die ab- 
solut das ganze Ram füllen, 
überschreiben die Routinen, 
von Decelerator. Für 16- 
Ram-Extension-only-Pro- 
gramme kann eine Compati- 
bilität durch Zurück versetzen 
von Decelerator um 8K er- 
reicht werden. Für jeden, der 
Maschinensprachkenntnisse 
besitzt, sollte dies kein Pro- 
blem sein, da nur die Adres- 
sen um 32 Pages erhöht wer- 
den müssen. 


DATRS 0O.K. 


234,8.0,0,8,8,8, 165, 


DECELERATOR 20m" 


an 


40,68,8.76,173,254,129,169.241.141,209,3,169, 


»76:31,68 


15 REM # 

28 REM KIRCHE ERATOROUR 

22 EEM %* * 

5 REM & <C) 1985 %#* 

27 REM # % 

36 REM * Er: * 

33 REM %& * 

35 REM #EBERHARD AUST# 

Ss’ REM % # 

48 REM KR 

68 FRINT"IF--------------------- 
r& PRINT” 63 1985 E.AUST  ------ 
106 REM 

161 REM EINLESESCHLEIFE 

102 REM 

115 FÜRH=KTI111:READB: POKE15300+R, B:PRF=FRF+B: NEXT 
idu REM 

141 REM DATAS PRUEFEN 

142 REM 

158 IFPRF<>1213ZTHENPRINT" MDATR":PRINT"ERROR" END 
186 REM 

151 REM DEIELR. STARTEN 

152 KEM 

134 57515318 

z&6 PRINT"------------ ------ - 
eldaä FRINT"DECELERATÜR IN RETION" 
z2u PRINT"---------------------- 5 
222 REM 

223 REM 8716 K RAMEXT. 

224 REM AUSSCHALTEN 

£25 REM 

=236 FRINT"RAMEXT. AUS (J> "; 

240 INPUTA$ 

Pe) 

18068 FEM 

l1ds1 Rem HMI RÖUTINE + 

1562 REM VORERTS.ROUT. 

18453 REM 

1v16 DATA169, 46,133, 255 

163 

1828 UATH196,141:24:.3,164:59. 141, 25,3,96 
zu646 REM 

zul REM HAUPFTROUTINE 

2uu2 REM 

zui6 DATA169,8, 135.255, 76,191, 

.& 

2u28 

2830 

B,4 

2846 DATAZGB, 192,58, 248,3, 76.408,68, 232 
245# REM 

Eu6H RE GESCHAFFT Hl 

eu7?8 REM 


CPU 68 


IFA$=" J" THENPOKES41,68: PÜKE642, 16: FOKE643, 0: POKE644., 38: POKES48, 38: 57564824 


39,141,21,3, 


7,281.5,298,19,174,32,60, 224 


IRTHR2489, 3,206, 32,68, 201,61,208,16,174,32,68, 224 , 255, 240, 3, 238, 32,60, 201,6 
IATAZOE., 18,165, 255. 201. 46,246, 3,76, 19,68, 234, 162,0, 224,8, 298, 3,76, 228,59, 16 
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CPU-Markt 


LaserWriter von Apple 


LaserWriter heißt das neue 
Flaggschiff unter den Apple- 
Peripherie-Geräten, das sıch 
mit seinen multifunktionalen 
Leistungsmerkmalen deut- 
lich aus der allgemeinen 
Druckerwelt hervorhebt. Eın- 
gebaute Zeichensätze geben 
dem Anwender den Vorteil, 
Zeichen und Grafik ın Laser- 


nen nahe und ergibt sich aus 
der ungewöhnlich hohen 
Auflösung von 300 Punkte 
Inch gegenüber 70 Punkte 
Inch bei „Normaldruckern. 

Verschiedene Schrifttypen 
bieten die uneingeschränkte 
Möglichkeit, Formulare, Be- 
richte, Geschäftsgrafiken und 
sogar Präsentationsfolien 


Auflösung zu erhalten und zu 
) Qualität 
kommt der von Satzmaschı- 


mischen. Die 


selbst zu erstellen. 
Erreicht werden diese viel- 
fältıgen Leistungsmerkmale 


Eingebaute Schrifttypen: 


Laserfähige Software: 


Grafik-Sprache: 


Netzwerkfähigkeit: 
Prozessor: 


Druckwerk: 
Ausgabemedium: 
Auflösung: 
Wartung: 


Garantie: 
Lieferbar: 
Preis: 


Der LaserWriter 
auf einen Blick 


Helvetica 

Tımes 

Courier 

Symbols 

Sämtliche Apple Macıntosh- 
Software, Lotus JAZZ. Sämtli- 
che Microsoft-Produkte für 
Macintosh sowie neue Spezial- 
produkte wie: Page Maker von 
Aldus Corp für den Satz und 
die Komposition von Mittei- | 
lungsblättern, Prospekte, Da- 
tenblätter. Nahezu alle ande- 
ren Macintosh-Produkte kön- 
nen ohne Modifikation einge- 
setzt werden. 

PostScript von Aldobe Sy- 
stems Inc.. PostScript ist sy- 
stemunabhängig, so daß auch 
ältere PC-Standard über Laser- 
Writer drucken können. | 
AppleTalk bereits eingebaut. 
Motorola 68000 (12 MHz) mit 
0,5 MB ROM und 1,5 MB 
RAM. 

Canon LBP-CX 10. 

Papier, OH-Folıe. 

300 Punkte pro Inch. 

Durch autorisierte Apple- 
Händler mit Macintosh Office- 
Spezialausbildung. Der Toner- 
Austausch kann vom Anwen- 
der selbst vorgenommen wer- 


den. Eine Kartusche für | 
2000-3000 Seiten. 
!2 Monate. 


Seit Juni 1985. 

DM 27 500,- (unverbindliche | 
Preisempfehlung inklusiv 14% | 
MwSt.). | 
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durch einen eingebauten Miı- 
krocomputer mit 68000-Pro- 
zessor, 1,5 MB RAM und 0,5 
MB ROM. 

Ferner benutzt der LaserWri- 
ter PostScript, einen neuen 
Standard für hochauflösende 
Ausgabegeräte. Damit ıst der 
LaserWriter kompatibel zu 
Satzmaschinen wie z. B. Li- 
notype. 

Kostengünstig wirkt sich die 
eingebaute Apple-Talk- 
Schnittstelle aus. Über App- 
leTalk können 31 Macintosh 
zusammen den LaserWriter 
benutzen. 

Auf dem LaserWriter können 
auch IBM-PC und Kompati- 
ble drucken. Dieser Drucker 
besitzt eine eingebaute Dia- 
blo 630-Emulation. Ein PC 
kann über eine RS 232- 
Schnittstelle direkt an den 
LaserWriter angeschlossen 


werden. Der LaserWriter 
wird dann statt einem Dia- 
blo-Typenraddrucker ver- 
wendet. Diablo 630 ist eines 
der meist benutzten Pro- 
tokolle. Eine weitere An- 
schlußmöglichkeit ist über 
die PC-Karte von Apple ge- 
geben. Damit kann der PC 
über AppleTalk auf dem La- 
serWriter drucken. Dabei 
wird wieder über das ım La- 
serWriter eingebaute Diablo 
630-Protokoll gedruckt. Die 
limitierten  Grafikmöglich- 
keiten des IBM-PCs sind da- 
mit allerdings nicht auszu- 
gleichen. 

Die Apple-Macintosh-Soft- 
ware ist mit dem LaserWriter 
kompatibel, so daß z. B. pro- 
fessionelle Softwarepakete 
wie JAZZ von Lotus oder die 
Software-Serien von Micro- 
soft genutzt werden können. 


\ 

v 

d 
vd 


Wie komme 
ich an 
Programme? 


Die Antwort auf diese Frage 
finden Sie auf Seite 64 und 


Seite 65! 


CPU 69 


Sonderpreis! CPU-Kleinanzeigen jetzt zum Sonderpreis! 


Verkaufe Originalprogramme TI %* Rex Soft & Superpro- Suche C 64, gut erhalten, zah- CPC464 !!! 


oder tausche gegen andere 
Originale ein! Deus ex machi- 
na 33, Tir na nog 22, Valhalla 
22, Pimania 13, Jet Set Willy 
12, King Arthur's Quest 19, 
PI-Eyed 9, Pl-Inre 9, Piıromanıa 
9, New Wheels John? 7, 
GOTO JAIL 6, PI-Balled 6, 
Backgammon 6, Psıon Chess 
6, Chess (Artic) 9, Flight Si- 
mulation 6, + 1 DM für Porto 
u. Verpackung. Georg Schei- 
be, Hebeckenkamp 9, 4355 
Waltrop, Tel. 02309 
746 19 


Verkaufe Atari-Recorder, Tel 
02152/510243 


Verk. TI99/4A + Ex. Basıc + 
Cass.R + Kabel + Mod. Espıi- 
al + J.-Adapter + 55 Progr 
auf 4 Cass. DM 730,-, auch 
einzeln. Tel. 07 11/5396 12 


Verkaufe TI-Soft-/Hardware 
u. Bücher!! Es lohnt sich! In- 
fos gegen -,60 DM in Brief- 
marken bei: Ralf Derissen, Jo- 
sef-Lambertz-Str. 21, 5120 
Herzogenrath 


NDR-Klein-Computer, 10 Pla- 
tinen, funktioniert, aus Zeit- 
mangel zu verk., Neupreis 


inkl. Monitor 1800.-, VB 
900,-. R. Niedermeier, Tel 
08067 /695 


Wegen Hobbyaufgabe abzu- 
geben 30 Lehr- und Ubungs- 
programme auf Cassette in 
Basicode-2 für nur DM 85,- 
(Vorkasse). Johann Fedder- 
mann, Postfach 102102, 
2000 Hamburg 1 


Massenweise Niedrigpreise! 
Für C-64, VC-20, C-16, ATA- 
RI, SPECTRUM, SCHNEIDER 
+ ZAXXON, BLUE MAX, 
GHOSTBUST. ab 35,-; FL 
SIM. || 136,-; Info für 1,50 (in 
BM) von H. Topf, Softw. & 
Serv., Alfred-Bucherer-Str 
63, 5300 Bonn 1, Tel. 02 28 / 
62 1392 


Anwenderprogramme für die 
Top-Computer Schneider 
CPC und ZX-Spectrum. Gra- 
tısinfo anfordern bei Friedrich 
Neuper, 8473 Pfreimd, Post- 
fach 72. Bitte Computertyp 
angeben! 


Tausche VC-64 Spitzenpro- 
gramme. Tauschlisten an 
Jürgen Hödl, Muggenthaler 
Str. 10, 8391 Tittling 
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gramme! % Wir bieten stän- 
dig neue Programme zu ech- 
ten Preishits! Großes Pro- 
grammangebotl Info 1,— DM 
bei: Danıel Peier, Hulfteggstr 
31, CH-8400 Winterthur 


TI99/4A Ext.-Spiel nur für Er- 
wachsene, Alter ang., zum 
Preishit von nur DM 10,- inkl 
Porto. Kass. u. Infoprogr. ın 
Umschlag an T. Karbach, 
Remscheider Str. 18, 5650 
Solingen 1 


TI99/4A Ext. Jetzt können Sıe 
Ihren Taschenrechner ver- 
gessen. Komfort. menüge- 
steuertes Progr. mit 14 Re- 
chenarten nur DM 10,-. In 
Umschlag an D. Karbach, 
Remscheider Str. 18, 5650 
Solingen 1 


® ® ® TI99/4A ® © © 
Drucke Ihre Listings, egal wie 
lang, auf Seikosha GP 100 A 
Kass. + DM 10,- in Umschlag 
an D. Karbach, Remscheider 
Str. 18, 5650 Solingen 1 


TI99/4A: Extended-Basic, P- 
Box, Disk-Drive, Disk-Control- 
ler, Console, 32k-Ram, kpl. 
VB 1800,- DM. Außerdem: 
Datenverw./Analyse, Text- u. 
Dateiverw., Tl-Writer. Helmut 
Zindel, Tel. 041 94 / 7564 


TI99/4A Hardware u. Soft. Su- 
che Peripherie-Box. A. Mlo- 
doch, Postf. 1527, 4352 Her- 
ten 


TI 99: Alpiner/Car Wars) 

Tombstone City/Tı-Invaders, 
Joysticks gegen Gebot. T 
09 11/51 2793 


TI99/4A: TI und Ex-Basic-Pro- 
gramme zu verk., Info q 
Rückporto, B. Knedel, Tul- 
pengasse 16, 3171 Weyhau- 
sen, Tel. 05362/71187 

ZX 81 + 16 KRAM + Netzteil, 
5 Bücher + 6 Origınal-Spiele 
+ 4 Softwarecassetten für 
DM 240,- abzugeben. Andre- 
as Ipolt, Landeckstr. 3, 6748 
Bergzabern, Tel. 06343 - 
43 48 


Suche käuflich Zeitschrift Ho- 
mecomputer 3/83 und 1-7/84, 
außerdem CPU 1-6/84 + 
8/84, Listings müssen lesbar 
sein. 


Suche Peri-Box für Tl, mög- 
lichst voll ausgestattet. Ha- 
ken hierbei: zahle gut, aber ın 
Raten! Chiffre: TI-B 


le bis 400,- DM oder Tausch 
gegen VC-20 + 6 KK + Su- 


perprogramme. A. Dinsch, 
Berliner Str. 17, 5980 Wer- 
dohl 


Spectrum. Unser Club Wup- 
pertal nimmt wieder Mitglie- 
der aufl Neues Konzept! Für 
alle ZX-Freaks ein muß! Info 
99. Rückporto. R. Knorre, 
Postf. 200102, 5600 Wup- 
pertal 2 


ZX-Spectrum. Software- 
Tausch, schickt Eure Liste an 
Anton Meisinger, Ungargasse 
11, A-7350 Oberpullendorf, 
Austria 


Statistik und System-Lotto 
für Spectrum 48K. Viele sta- 
tistısche Werte u. autom. 
Ubernahme ins System. 26(!) 
Auswahlkriterien. Mutlu, Eı- 
chenstr. 4, 6790 Landstuhl 


ZX-Spectrum: Tape-Kopierer, 
kopiert fast alle Programme 
am Markt. Zeigt auch Header- 
Daten. 15,— DM / 99,- öS, W. 


Hübl, Klitschg. 18, A-1130 
Wien 
%* Spectrum-Programme- 


Tausch % Über 100 versch. 
Programme. Kein Rückporto 
erf. Liste an: Detlef Thee, 
Schwartauer Allee 35, 2400 
Lübeck 1, Tel. 0451 / 
47 4930 ab 19 Uhr 


ZX Spektrum 48K, ZX Printer, 
Software, Joystick zu verk., 
Preis 500,— DM komplett. J 
Schneider, Flurstr. 7, 6581 
Dickesbach, Tel. 06784 / 
8942 


VC 20. Suche 40/80 Karte und 


schaltbare Modulbox (billig)). 
Suche gute Programme (aller 
Art). Angebote nur schriftlich 
an Bernhard Helle, Schüt- 
zenstr. 11, 4100 Duisburg 14 


Hallo VC-20-Freaks! Wer hat 


Interesse in einem Club mitzu- 
machen? Der CVC hat 13 Mit- 
glieder und neue sind herzlich 
willkommen! Außerdem gibt's 
eine Clubzeitschrift. CVC c/o 
Dirk Weißenborn, Falkenweg 
66, 7400 Tübingen 


Neu — das Mallbox-Telefon- 


buch-Rufnummer-Ver- 

zeichnis der DFU-Anbieter 

einschl. Datex. p. mit monatl 

Nachtrag (1 Jahr) zu bezie- 

hen für 8,50 DM. Tel. (04 21) 
56 38 00 oder 56 38 31 


Verlängerungs- 
Kabel zwischen Monitor und 
Keyboard mit passenden 
Steckern nur DM 20,- an 
Postscheck Hamburg 32572- 
201 oder Schein an H. Beh- 
rendt, Marrensberg 2, 2390 
Flensburg 


CPC 464 Printer :NLQ401: zu 
verk. VB 650,- DM, neu, 2 
Mon., und einm. Originalprg.., 
wie Rechnungssch., Text., 
Chess u. a., wegen Aufgabe 
abzugeben. Tel. 0211 
27 47 51 ab 16 Uhr 


CPC 464!! Super-Software: 
Z.B. 3-D-Fußball oder Night 
Flight nur je DM 20,-I Text- 
verarbeitung etc. alles vom 
COMPI-Club, J. Heise, A. d 
Linde 8, 5226 Reichshof. Info 
gratis! 


CPC464 !!! 12 gute Spielpro- 


gramme auf Kassette, keine 
Raubkopien. DM 20,- an 
Postscheck Hamburg 
404576-207 oder Schein im 
Brief an Hans-J. Behrendt, 
Neustadt 3, 3550 Marburg 


Der 64'er SOFTWARE-CLUB 


aus Bochum sucht Verbin- 
dungen zu anderen Compu- 
ter-Clubs. 

Club-Aktivitäten: Club-Tref- 
fen, Club-Fahrten, Club-Zei- 
tung „CLUB-NEWS" und Aus- 
tausch von Programmen 
Unsere Adresse: 

64'er SOFTWARE-CLUB 
Oliver Nürnberg, 
Holtingstraße 16c 

4630 Bochum 1 


Wir suchen Euch”?! 
Alle Computerfreaks die be- 
reit sind, folgende Dienste 
kostenlos in Anspruch zu 
nehmen bzw. zu teilen 
Wır bieten 
1 Softwaretausch 
2. Entwicklung von Hard- u 
Software , 
3. Beratung bei Problemen 
4. Reparaturen 
5. Programmierkurse 
6. Erstellung einer 
tung 


Clubzei- 


Willkommen sind alle Systeme 


Computertypen 

Interessenten wenden sıch 
bitte, wenn möglich bitte mit 
Rückporto, an den: IC Com- 
puterclub, Beethovenstr. 66, 
4815 Schloß Holte-Stuk., Tel. 
05207/87700. Jeder Brief 
bzw. Anruf wird beantwortet 


7185 


Kleinanzeigen 


Liebe Leser, 

wollen Sie eine Kleinanzeige aufge- 
ben? Suchen Sıe einen gebrauchten 
Home-Computer, Software, Hardwa- 
re, Kontakte zu Computer-Clubs etc.? 


Dann nutzen Sie jetzt den Kleinanzei- 
genservice der „CPU*: Die „CPU* ist 
ein kompetentes Anwender-Mlagazin. 


Sıe erreichen durch uns eıne Vielzahl 
von Lesern ım In- und Ausland. 


Und so wird's gemacht: 
Kleinanzeigen-Coupon ausfüllen (alle 
Zeilen können ausgefüllt werden) und 
einsenden an 


Tronic-Verlag 
Postfach 41 
3444 Wehretal | 


Also, schnell ausfüllen und einwerfen 
ın den nächsten Postkasten. Dann ıst 
mit Sicherheit Ihre Kleinanzeige da- 
bei. 


Neue Matrix- 


- CPU - 
Basar 


- CPU - . . 
Basar Kleinanzeigen 
Bitte veröffentlichen Sie ab nächstmöglicher Ausgabe unter der Rubrik: 
[] SOFTWARE [] HARDWARE DJ) VERSCHIEDENES 


Mein Computersystem: 


folgenden Text: 


Bi 1 


Bitte jeweils 28 Buchstaben pro Zeile! Bitte Absender nicht vergessen! 


Preis für Kleinanzeigen: 10 DM je Kleinanzeige 
(keine gewerbliche [] per [] Scheck 
Nutzung) Vorkasse 


U B a T 


Name/Vorname 


PLZ/Ort 


Ich versichere hiermit, 

daß die angebotenen 
Programme/Beiträge [rei von 
Rechten Dritter sind! 


Datum, Unterschrift 


Die Gewinner unseres Preisrätsels 
aus dem Monat Mai! 


Drucker 
von OKIDATA 


Die neuen MICROLINES 
ML 192 und ML 193 bieten 


eine hohe, wegoptimierte 
Druckgeschwindigkeit von 
160 Zeichen/Sek. ım Ent- 


wurfsdruck-Modus (für den 
schnellen Ausdruck von 
EDV-Listen) und ein gesto- 
chen scharfes Schriftbild ım 
Schönschrift-Modus (für Do- 
kumente und Geschäftsbrie- 
fe) mit 33 Zeichen/Sek. (auto- 
matischer Einzelblatteinzug 
als Zubehör). 

Der ML 192 bzw. 193 verfügt 
über viele sinnvolle Sonder- 
funktionen, z. B. Dehnschritt. 
Hoch-/Tiefstellungen, horı- 
zontalen und vertikalen Fett- 
druck, kontinuierliches Un- 
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| 
| 


terstreichen, echte Unterlän- 
gen, 12 nationale Zeichensät- 
ze (inkl. ASCI (©). ASCI 
(0)), IBM-Zeichensätze, 
punktadressierbare Vollgra- 
fik (bıs 288 x 144 Punkte’- 
Zoll). 


Die MICROLINES 192 und 
193 können verschiedenste 
Papierarten verarbeiten, wo- 
bei der ML 193 durch seine 
größere Wagenbreite an zu- 
sätzlicher Flexibilität gewinnt 


| (maxımale Papıerbreite be- 


trägt 406,4 mm). 


Eine Centronics-parallele 
Schnittstelle gehört zu der 
Standardausrüstung des neu- 
en ML 192 bzw. ML 193. 


1. Preis: 


10 Kassetten aus unserem | 


Software-Service 
Michael Nahm, Ochsenfort 


2. Preis: 

3 Kassetten aus 
Software-Service 
Andreas Streng, Coburg 


unserem 


3. Preis: 

2 Kassetten aus 
Software-Service 
Klaus Paradies, Rheine 


unserem 


4.-30. Preis: 

H.-G. Hasebrock, Schüttorf 
Bernd Michaelsen, Hamburg 
Michael Burgmaier, Ertingen 
Joachım Böhm, Georgens- 
münd 

E. Vornberger, Randersacker 
Jürgen Gerkens, Hamburg 
Roland 
Würzburg 


Stefan Sieloff, Pullach 
Günter Schmidt, München 
Berthold Prause, Wendeburg 
Gunnar von der Beck, Dillen- 
burg 

Alois Leimüller, Köstendorf 
Alfred Rehberger, Feldheim 
Wilfried Ganschinietz, Tier- 
haupten 

Friedrich Tanzer, Wien (Au- 
strıa) 

Michael Gilles, Singen (Ho- 
hentwiel) 

Michael Kircher, Bergheim 
Reiner Weidmann, Nürnberg 
Uwe Velker, Rheine 

Reiner Dold, Filderstadt | 
Markus Eisenmann, Winnen- 
den 

Matthias Marx, Langenhagen 


| Karl Müller, Memmingen 


Hammelmann, 


Burkhard Blümke, Kempen | 
Gilbert Hönig, Overath 

Paul Dietsch, Köln 

Jens Schmidt, Bremen 
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Korrektur zur CPU-Ausgabe Nr. 6 


„Disk Check“ für den Apple-Computer 


Aufgrund technischer Probleme mit unserem Drucker sind beim Ausdrucken des 
Listings leider einige Fehler aufgetreten. Hier die Korrektur: 


] JEIST 'SSsOo 
JLIST 220 >50 IF ERR = O THEN HOME : HTAB 
15: VTAB 19: INVERSE : FRINT 

220 IF LEN (T£) = O OR VAL ( LEFT$ "NO ERRORS !": WAIT - 18384 
(T2,1)) = O THENL = 734 ‚128: HOME : GOTO 300 

JLIST 300 JLIST 350 

300 NORMAL =: HTAB 1: VTAB 18: FRINT S50 VTAB 19: INVERSE : INFUT "OU 
"1. FRINT BAD SECTORS": PRINT TPUT-SLOT (0-7 X<DEFAULT O 
= FRINT " RESTART": PRINT | 79 7 "35$:5 = ABS ( INT ( VAL 
: FRINT "3 EXIT": FRINT : GET | (S$))): IF S > 7 THEN Z50 
T£:X = ABS ( INT { VAL (T$) 
I): IF X > 3SO0ORX = 0 THEN 3 
00 ] 


8018- 00 03 8D O1 03 85 FF 68D 


Wenn Sie in der Lage sind, auch andere an Ihren Ideen teil- 
haben zu lassen, dann setzen Sie sich mit dem TRONIC- Verlag 
in Verbindung! 


Wir suchen ständig neue Beiträge, z. B.: 


— Tips und Tricks für die verschiedenen Computersysteme 
— Kleine Maschinen-Routinen (Assembler-Listing) 

_  —- BASIC-Unterprogramme 

 — Hardware-Bauanleitungen 
—- und andere Beiträge 


Wir brauchen von Ihnen: 


l. Ausführliche Beschreibung des eingesandten Beitrages 
2. Datenträger (Kassette oder Diskette) 
3. Komplettes Listing (wenn zur Beschreibung erforderlich) 


All dies senden Sie bitte an den TRONIC-Verlag, Postfach, 3444 Wehretal 1 
Wir zahlen: 120,— DM pro abgedruckte Seite. 
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CPU-Club-Vorstellung : 


CPU-Clubvorstellung: 
SVV/MSC-Computer-Club 


Zielgrup 


Zielgruppe des Clubssindalle | 
SVI- | 


Besitzer(innen) von 
Computern (SVI-318, SVI- 
328, SVI-728; bei entspre- 


chender Nachfrage auch der | 


Geräte Bondwell 121416). 


Projekte 


1) Herausgabe einer regelmä- 
Big erscheinenden Club- 


Zeitschrift. Geplant ist ein | 


‚ Miitgliedsbeitra 


vierteljährlicher Rhyth- 
mus. 

2) Erfahrungs-Austausch: 
Hierzu gehören Soft- und 
Hardware-Probleme und 
deren Lösung. Neuent- 
wicklungen, günstige Ein- 
kaufsquellen usw. 

3) Software-Börse: Hier 
wünschen wir uns einen 
regen Austausch von 
selbstgeschriebenen Pro- 
grammen. Bevorzugte 
Programmiersprachen 
sind (neben BASIC) PAS- 
CAL und „C“, außerdem 
Z80-Maschinensprache 


unter CP/M und BASIC. 
4) Kontakte zu anderen 
User-Clubs: Obwohl wir 
uns als „offizieller“ User- 
Club verstehen (mehr 
dazu später), sind wir dar- 
an interessiert, mit evtl. 
schon bestehenden Clubs 
Kontakt aufzunehmen. 
Dazu gehören auch - ent- 
sprechende Nachfrage 
vorausgesetzt — die MSX- 
Clubs anderer Hersteller. 


Da wir wissen, daß viele SVI- 
Besitzer noch Schüler sind, 
wollen wir einen möglichst 
niedrig gehaltenen und au- 
Berdem gestaffelten Mit- 
gliedsbeitrag einführen. Die- 
ser Beitrag soll in erster Linie 
dazu dienen, die Unkosten 
für die Herausgabe der Club- 
Zeitschrift zu decken; geplant 
ist ein Jahresbeitrag von DM 
30,- für Schüler und DM 60,- 
für den „Rest der Welt“. Wir 
vertrauen hier auf die Ehr- 
lichkeit unserer Mitglieder 


und bitten ausdrücklich dar- 
um, daß sich nicht alle Bes- 
serverdienenden unter dem 
Namen ihrer Söhne und 
Töchter anmelden! 


Die augenblick- 
liche Lage 


Bisher können wir folgende 
Leistungen und Kontakte 
vorweisen: 

Il) Unterstützung durch die 
deutsche SVI-Vertretung 
und Anerkennung als „of- 
fizieller“* User-Club. 

2) Kontakte zum SVI-Club 
Österreich. 

3) Vermittlüng besonders ge- 
lungener Programme und 
Hardware-Zusätze an ein 
professionelles System- 
haus. 

4) Telefonischer Feuerwehr- 
dienst für akute Soft- und 
Hardware-Schwierigkei- 
ten unter den Nummern 
(0209) 205242 (Uwe 
Schröder) für den nord- 
deutschen und 


(061 52) 58452 (Rainer 
Monzheimer) für den süd- 
deutschen Raum. 


Wir würden uns freuen, Sie 
als Mitglied begrüßen zu kön- 
nen. Falls Sie sich zu einem 
Beitritt entschließen, teilen 
Sie uns dies bitte mit, unter 
Angabe der folgenden Punk- 


te: 

l Welche Geräte (Grundge- 
rät, Expander, Disketten- 
laufwerk(e), Drucker usw.) 
besitzen Sie? 

2) Welche Software können 
Sie evtl. anbieten, woran 
sind Sie besonders interes- 
siert? 

3) Welche Erfahrungen (po- 
sitiv oder negativ) haben 
Sie bisher mit SVI ge- 
macht? 

4) Was erwarten Sie von ei- 
nem SVI-Club? 


Anschrift: 

Uwe Schröder 
4650 Gelsenkirchen 
Wannerstraße 57 


Club-Vorstellung: 
Rex Soft-TI-User-Club 


Unser Club besteht 
nicht sehr lange ... 
Zuerst war Rex Soft „nur“ 
eine kleine Gruppe von TI- 
Usern, die Software herstel- 
len, doch als wir feststellten, 
wie stark das Interesse am TI 
ist, haben wir uns entschlos- 
sen, daraus einen Club zu 
machen ... 

Der Club besteht zur Zeit aus 
über 30 Mitgliedern, aber 
Rex Soft ist stark am wachsen 


noch 


Uns scheint es, daß es noch 
viel mehr TI-User gibt, die 
Interesse an einem solchen 
Club haben, darum möchten 
wir unseren Club ein wenig 
vorstellen. 
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Unser Club versucht alle Pro- 
bleme zu lösen ... 

Wenn ein Mitglied etwas auf 
dem TI programmieren will, 
und er weiß nicht wie, dann 
kann er sich an die anderen 
Rex Soft Mitglieder wenden. 
Da unsere Mitglieder aus ver- 
schiedenen Ländern kom- 
men, haben wir uns für brief- 
lichen oder telefonischen 
Kontakt entschieden. 

Die Zentrale von Rex Soft ist 
in der Schweiz, aber uns 
scheint es sehr wichtig, daß 
sich die Mitglieder unterein- 
ander auch kennen. Wir ha- 
ben auch eine eigene Club- 
zeitschrift, die etwa monat- 
lich erscheinen wird. 


Diese Zeitschrift haben wir 
noch als Programm gestaltet, 
um diese für alle Mitglieder 
gratis anbieten zu können ... 
Unsere Zeitschrift soll von al- 
len Mitgliedern zusammen 
gestaltet werden. Hier werden 
Probleme behandelt, die für 
alle wichtig sind. Weiter gibt 
es Tips & Tricks, die noch 
(fast) niemand kennt, außer- 
dem existiert eine Ideenecke, 
und Softwaretests von Pro- 
grammen, die Rex Soft Mit- 
glieder durchgeführt haben. 

Ebenfalls möchten wir in die- 
ser Zeitschrift eine Top Ten 
über Programme, die in TI- 
Basic oder X-Basic geschrie- 
ben sind, bringen. Bei Rex 


Soft ist noch viel mehr ge- 
plant ... Wir suchen auch 
ständig nach neuen Ideen ... 
Bei uns ist was los ...! 

Wenn Ihr das Info wollt, legt 
Ihr am besten I DM 
Rückporto bei ... 

Anschrift: Rex Soft, Daniel 
Peier, Hulfteggstraße 31, 
CH-8400 Winterthur 


Nutzen Sie die 
Möglichkeit zur 
kostenlosen Vor- 
stellung Ihres 
Computer-Clubs 
in der CPU! 
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CPU-Markt 


Der Sharp 16-Bit-Bürocomputer 
aus der MZ-5600-Serie 


Dieser 16-Bit-Computer be- 
sitzt eine Speicherkapazität 
von 256 KB Standard und ist 
erweiterbar auf 512 KB. Das 
Diskettenlaufwerk schafft 
Speicherplatz für 800 KB pro 
Laufwerk und das Modell 
MZ-5645 ist standardmäßig 
sogar mit einem integrierten 
10-MB-Festplattenlaufwerk 
ausgestattet. 

Bemerkenswert ist vor allem 
der große Video-RAM-Spei- 
cher von zusätzlich 96 KB 
mit einem Anzeige-Kontroll- 
LSI für exzellente Grafikdar- 
stellungen: Die Anzeige er- 
folgt im Video-RAM bitwei- 
se, d. h., daß ein Punkt einem 
Bit entspricht, um ein saube- 
res, klares Bild zu gewährlei- 
sten. Dies ist auch beim „Rol- 
len“  vorteilhaf. Durch 
„punktweises Rollen“ wird 
die Lesbarkeit der Zeichen er- 
halten, auch wenn sich die 
Anzeige verschiebt. Für die 
Arbeit mit Farbgrafiken sind 
die Farbauswahlfunktion und 
die  Farbprioritätsfunktion 
wertvoll. 

Der zusätzliche Speicherplatz 
im Video-RAM schafft eben- 
falls die Möglichkeit der 


Window-Darstellung. Bis zu 
vier verschiedene Bild- 
schirmmasken können als 
Fenster auf dem Bildschirm 
gleichzeitig angezeigt werden. 
Für die schnelle Verarbeitung 
der Daten und Grafiken sorgt 
der 8086-Mikroprozessor mit 
16-Bit-CPU. Das Betriebssy- 
stem EOS 16 ist anwendungs- 
kompatibel zu CP/M-80, 
CP/M-86, CCP/M-86 und 
MS-DOS. Damit kann- die 
MZ-5600-Serie auf einen 
enormen Software-Markt 
vom Start weg zurückgreifen 
— übrigens auch auf das sehr 
weit verbreitete Angebot der 
8-Bit-Software, die mit dem 
angebotenen Z-80-Board so- 
fort lauffähig ist. 

Die Multiskating-Funktion 
ermöglicht einen gleichzeiti- 
gen parallelen Programmab- 
lauf. 

Als Optionen bietet Sharp 
eine „Mouse“ als Eingabeein- 
heit, die komplizierte Ein- 
tastfolgen erübrigt. Außer- 
dem gibt es den numerischen 
Datenprozessor 8087 für be- 
sonders schnelle Berechnun- 
gen. Als Bildschirm ist wahl- 
weise ein 12”-Monochrom 


KEIHERE, 


Es 


oder 15”-Farbbildschirm er- 
hältlich. 

Für den umfangreichen Aus- 
bau der Peripherie bietet das 


System eine Vielzahl einge- 
bauter Schnittstellen, u. a. 
Centronics, 2 Kanal RS-232C 
synchron und asynchron. 


Neuer EPSON GX-80-Drucker 
an Heimcomputer angepaßt 


Mit dem neuen Matrixdruk- 
ker GX-80 liefert EPSON ei- 
nen leistungsfähigen und 
preiswerten Drucker für den 
Heimcomputerbereich. Der 
GX-80 benötigt keine spe- 
ziellen Interfaces mehr, son- 
dern ist mit Hilfe von ROM- 
Modulen bereits fertig an den 
betreffenden Computer ange- 
paßt. Bisher sind das Com- 
modore 64 und Atari-Com- 
puter; andere werden in kur- 
zen Abständen folgen. Der 
GX-80 wartet mit für den 
Heimbereich bemerkenswer- 
ten Eigenschaften auf: 100 
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Zeichen pro Sekunde, I KBy- 
te Buffer und Download-Be- 
reich und neben dem norma- 
len Schriftbild ein NLQ-(Let- 
ter-Quality-)Zeichensatz im 
ROM. Mit 32 internationalen 
Sonderzeichen deckt er die 
länderspezifischen Schriftar- 
ten ab, und eine Vielzahl pro- 
grammierbarer Funktionen 
läßt eine vielseitige Verwen- 
dung zu. Der GX-80 trans- 
portiert Einzelblätter mittels 
Friktionsantrieb. Eine Kas- 
sette für automatischen Ein- 
zelblatteinzug sowie eine 
Traktorführung für Endlos- 


papier sind optional erhältlich. 


Technische Daten des EPSON GX-80-Matrix-Drucker 


Druckmethode: Nadel-Matrix-Drucker 

Geschwindigkeit: 100 Zeichen pro Sekunde 

Druckrichtung: Bidirektional mit Druckwegoptimie- 
rung, unidirektional im Graphikmo- 
dus 

® Anzahl Nadeln: 9 

Zeichensätze: 2x 96 ASCII-Zeichen mit je 32 inter- 
nationalen Zeichen, desgl. NLQ-Zei- 
chensatz im ROM 

Schriftarten: Pica und Elite normal, gesperrt, fett, 


komprimiert-gesperrt 


Fortsetzung S. 78 
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Bibliothek * 


Der Mikro-Computer im Beruf 


Heyne-Verlag, München; Autor: Manfred S. Schmidt; Preis 9,80 DM - Best.-Nr. 15/4 


Dieses Buch versucht die Ma- 
terie „Computer“ in der 
Form der Reportage an den 
Mann zu bringen: der Mikro- 
computer in Büro, Kanzlei 
und Praxis, bei Freiberuflern, 
Selbständigen, Kleinunter- 
nehmern bis hin zu Mana- 
gern und Veranstaltern von 
Autorennen. 

Der Autor dieses Buches, 
Manfred S. Schmidt, hat über 
zwei Jahre eine Vielzahl von 
Mikrocomputer-Anwendern 

besucht, um sie über ihre Er- 
fahrungen, ihre Fehler und 
Erfolge zu befragen. Seine Be- 
richte über die diversen Pro- 
blemlösungen ergeben ein 
vielfältiges, lehrreiches Bild. 
Es kann dennoch nur eine 
Auswahl von Fallbeispielen 
sein, die keinen Anspruch auf 
Vollständigkeit erhebt, weder 
im Einzelnen noch im Spek- 
trum aller möglichen Com- 
puteranwendungen. 

Der Leser dieses Titels soll 
darüber informiert werden, 
welche Erfahrungen andere 
bereits mit dem Mikrocom- 
puter gemacht haben, damit 
er selbst Fehlplanungen und 


Fehlnutzungen vermeidet. 
Und so bietet sich beim Le- 
sen folgende Methode an: Su- 
chen Sie sich anhand des In- 
haltsverzeichnisses den Be- 
reich heraus, dem Sie selbst 
zugehören, und gehen Sie an- 
schließend zu verwandten 
Bereichen über — auch dort 
gibt es Anwendungen und 
Problemlösungen, die Sie in- 
teressieren werden. 


Einige Kapitel aus dem In- 
haltsverzeichnis: 
Reportagen über den Einsatz 
von Mikrocomputern 
l. Einzelhandel 
2. Werbung — Direktverkauf 
— Versand - Großhandel — 
Transport 
. Vertretung — Vermittlung 
. Anwaltschaft — Kanzlei- 
verwaltung 
. Handwerk 
. Landwirtschaft 
. Gastronomie 
. Baugewerbe 
. Architektur — Technik 
0. Ärztliche Praxis - Medi- 
zinische Versorgung 
Il. Vereinswesen — Sport 


Geldverdienen 
mit 


Programmierung 


Dieses Buch wendet sich an 
die große Schar der Heimpro- 
grammierer und Computer- 
freaks. Die Begeisterung die- 
ser Leute ist dazu prädesti- 
niert, einen wesentlichen Bei- 
trag zur Überwindung der 
Softwarekrise zu leisten. Vor- 


aussetzung dazu ist, daß eine 
Brücke zwischen den Anfor- 
derungen der Industrie und 
den Produkten der Heimwer- 
ker geschaffen wird. 

Das Ziel des Buches ist, hier- 
zu einen wichtigen Beitrag zu 
leisten. Software hat heute 


HEYNE 
COMPUTER BÜCHER 


BERU 


era vorm Women, 


immer dann eine große kom- 
merzielle Chance, wenn sie 
profihaft erstellt und ver- 
marktet wird. Was darunter 
zu verstehen ist, muß der 
Programmierer wissen, bevor 
er anfängt, seine kostbare Zeit 
in die Entwicklung von EDV- 
Systemen zu investieren. 

Im ersten Kapitel des Buches 


werden Rahmenbedingungen 
für die Beschäftigung mit 


Y EeN 7, 
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Software aufgezeigt. Dabei 
werden Antworten darauf ge- 
geben, wie eine 
Programmieridee entsteht, 
ob ein fester Auftrag oder 
eine Eigenentwicklung inter- 
essanter ist, welche Voraus- 
setzungen an Zeit, Raum, 
Geld und Know- 
how vorhanden sein müssen, 
und was an Aufgaben im 


(Fortsetzung nächste Seite) 
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COMPUTER BÜCHER 


Karl-Heinz Landeck 


Mit Basic 
zum Erfolg am Computer 


Computergestützter Fremd- 


Ein Hauptproblem des com- 
putergestützten Unterrichts 
heute ist die unstrukturierte 
Art, wie Informationen über 
existierende und in der Ent- 
wicklung befindliche Compu- 
terprogramme verbreitet 
werden. Gute Programme - 
einschließlich solcher, die 
erst vor kurzem für Mikro- 
computer entwickelt worden 
sind — wurden bisher nicht in 
einer Weise öffentlich doku- 
mentiert, daß andere von ih- 
nen lernen konnten. Nur we- 
nige Programme sind im 
Handel erhältlich, und zahl- 
reiche Lehrer/Programmierer 
arbeiten unabhängig vonein- 
ander und haben nur wenig 
oder gar keine Ahnung von 
existierenden oder in Ent- 
wicklung befindlichen Pro- 
grammen. Bei Fortbildungs- 
veranstaltungen ist es nicht 
selten, daß einfache Program- 
me demonstriert werden, die 
weit hinter dem inzwischen 
erreichten Standard zurück- 
bleiben. 


Aus dem Inhalt: 

Grundlagen der Arbeit mit 
Computern im Fremdspra- 
chenunterrichtt -— Anwen- 
dungsbeispiele aus den Berei- 
chen Grammatik und Lexik 
und die Fertigkeiten Lesen, 
Schreiben, Hören und Spre- 
chen — Möglichkeiten und 
Grenzen einer Übungstypo- 
logie. 

Stand der Forschung in Euro- 
pa und den USA — Hardware 
und Hardware-Entwicklung. 
Erfahrungen mit Computern 
im Fremdsprachenunterricht 
an Universitäten und Schu- 
len — Programme und Pro- 
grammbeschreibungen. 
Glossar zum computerge- 
stützten Fremdsprachenun- 
terricht. 
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sprachenunterricht 


Herausgegeben von der Langenscheidt-Redaktion, Berlin/München. 
Mit Beiträgen von 11 verschiedenen Autoren. ISBN 3-468-49434-3 


MSX - Der erste 


Heimcomputer-Standard 


Einführung in: 


Technik, Program- 


mierung und 
Anwendung 


Autor: Dietmar Eirich, Hey- 
ne-Verlag München — ISBN- 
3-453-47052-4. Preis: 12,80 
DM 


Dieser Titel gibt Antwort auf 

folgende Fragen: 

— Was heißt MSX — welche 
Technik steckt dahinter? 

— Wie steht es mit der Softwa- 
re? . 

— Welche Anwendungen gibt 
es — welche sind wirklich 
sinnvoll? 


Einige wichtige Kapitel aus 

dem Inhalt: 

— Markt und Technik eines 
neuen Standards 

- Firmen und Geräte: Hinter- 
grundinformationen und 
Marktübersichten 

- Peripherie und Zusatzgerä- 
te 

- Programmieren mit MSX- 
BASIC 


Dieses Buch wurde bereits in 
der Juni-Ausgabe der „CPU“ 
ausführlich vorgestellt. 
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Dietmar Eirich 


MS5X 


DER ERSTE 
HEIMCOMPUTER STANDARD 
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Technische Daten des Epson 
GX-80-Matrix-Drucker 


(Fortsetzung von Seite 74) 


Blattaufteilung: 


Papiertransport: 
Interfaces: 


Input-Buffer und 
Download-Bereich: 
Optionen: 


Programmierbarer Zeilenvorschub, 
bis 32 Positionen hor. Tabulator 
8x 16 vert. Tabulatorpositionen 
Walzenvorschub für Einzelblätter 
ROM-Cartridges für Commodore 64 
und Atari, weitere in Vorbereitung 


Il KByte 
Traktorführung für Endlospapier, 
Einzelblatt-Kassetten-Aufsatz zum 
automatischen Einzug von Einzel- 
blättern 


EPSON QX-16: 


Mehrere Computer in einem 


| Technische Daten des EPSON QX-16 Personal Computer: 


Der Personal Computer EP- 
SON QX-16 erschließt eine 
Vielzahl von Anwendungen. 
Denn er ist als Dualprozes- 
sorsystem mit Zilog Z 80 und 
Intel 8088 aufgebaut. Somit 
stehen neben dem EPSON- 
spezifischen Betriebssystem 
auch CP/M 2.2, CCP/M und 
MS-DOS zur Verfügung, so 
daß der QX-16 auch IBM 
PC-kompatibel ist. Über 
ENABLE wird ein mitgelie- 
fertes integriertes Programm- 
paket, das Dateiverwaltung, 
Kalkulation, bit-mapped 


Grafik und Telekommunika- 
tion umfaßt, bedient. Hinzu 
kommt Autopilot, mit dem 
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Lösungen auch ohne Pro- 
grammiererfahrung selbst ge- 
schneidert werden können. Je 
nach Betriebsart werden 2 x 
320, 2x 360 oder 2 x 720 
KByte auf Diskette gespei- 
chert. Eine Festplattenver- 
sion kommt demnächst, der 
Controller ist schon  inte- 
griert. 512 KByte RAM, 128 
KByte Bildspeicher und her- 
vorragende, vom Betriebssy- 
stem und dem Grafikprozes- 
sor NEC 7220 unterstützte 
Grafik erschließen neue Mög- 
lichkeiten in der Leistung von 
PCs. Der QX-16 ist IBM PC- 
kompatibel. 


Prozessoren: 


Betriebssysteme: 


Arbeitsspeicher: 


Massenspeicher: 


Schnittstellen: 


Steckplätze: 
Bildschirm: 


Tastatur: 


Miitgelieferte 
Software: 


Z80 A, 8 bit, 4 MHz 

8088, 16 bit, 5,3 MHz 

Graphik NEC 7220, 17 MHz 
EPSON CP/M 2.2 Multifont 
Concurrent CP/M 

MS-DOS, IBM PC-kompatibel 

512 KByte Ram 

Floppy Disk Drives 5% Zoll 

2x 640 KByte im QX-16-Format 
- 2x 320 KByte im QX-10-Format 
- 2x 720 KByte im IBM PC-Format 
Seriell: RS 232 C (V.24), program- 
mierbar 

Parallel: Centronics 8-bit Standard 

3 


wahlweise 

- 12 Zoll monochrom, hochauflö- 
send 640 x 400 Punkte, bit-mapped, 
25 Zeilen x 80 Zeichen, entspiegelt 
(serienmäßig) 

- 14 Zoll Color, 640 x 400 Punkte 
(Zusatzkarte erforderlich) 

— IBM-kompatibler Monitor, 640 x 
200 Punkte 

Nach DIN, 105 Tasten mit Rechen- 
block, Cursorbkock, Funktionstasten- 
block, Cursorsteuerung auch mit stan- 
dardmäßiger Maus 


I 


ENABLE: 

Programmpaket aus 5 intigrierten 
Modulen mit Textverarbeitung, Kal- 
kulation, Datenbank, Graphik, Kom- 
munikation 

SCOUT: Maus-Steuerung 
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BILLIGER 


wird auch Ihre Homecomputerzeitschrift 


wenn Sie sich für ein Jahresabonnement 
von 
HOMECOMPUTER, COMPUTRONIC 
und CPU als Kombination 
entscheiden. 


Für 
6 Hefte von HOMECOMPUTER, 
6 Hefte von COMPUTRONIC und 
12 Hefte von CPU 
zahlen Sie im Jahresabonnement 
statt 141,— DM nur 100,- DM. 
Sie sparen also sage und schreibe: 41,— DM. 


Bei Lieferung in das europäische Ausland beträgt 
das Jahresabonnement HOMECOMPUTER, COMPUTRONIC 
und CPU 150,- DM, nach Übersee 200,- DM 


Wir garantieren: 
% Sie erhalten HOMECOMPUTER, COMPUTRONIC und CPU ab der nächsterreichbaren Ausgabe. 
% Lieferung erfolgt frei Haus inkl. Mehrwertsteuer. 
% Die Zustellgebühren sind im günstigen Abonnementpreis enthalten 
%* Es entstehen Ihnen keine weiteren Kosten. 


l 
Ausschneiden und einsenden an: . 
Bestellgutschein 
Ja, ich möchte ins Computerleben einsteigen und bestelle deshalb: 
Jahresabonnement Kombi: HC, Computronic und CPU (24 Hefte) 100,- DM 
Jahresabonnement HC und Computronic (12 Hefte) 55.- DM 
Jahresabonnement CPU (12 Hefte) 55.- DM 


000 


Name Vorname 


Straße. Nr PLZ. On 


Ich wünsche folgende Zahlungsweise: 


| . U Bargeldlos durch Bankeinzug 
Verlagsunion Tee 


Friedrich-Bergius-Straße 20 
Postfach 57 07 


6200 Wiesbaden 


Geldınstitut Konto-Nr 


U] gegen Rechnung 


Datum. Unterschrift 


Abonnements-Kündigungen: 

6 Wochen vor Ablauf des Jahresabonnements. 

Außerdem kann ich diese Bestellung innerhalb von 10 Tagen beim Verlag widerrufen! 
Zur Wahrung der Frist genügt 

die rechtzeitige Absendung 

des Widerrufs! Datum, Unterschrift 


Ihr Erfolgsprogramm - 
aus dem nee 


(Ca) Compute mit 


| monatlich 
v NEE BSOommOono! Format A4 
omputing | zu | 2,80 DM 
Jetzt 


ei | HaBovn Bean Jauch rgerachen 
rogrammina RI, 


| = 
MT Dune rer 


Hardware-Tests: 


| Software- Tests: ) 
Programm 


tur 
Schneider 


An Spiele-Kassetten | 
jetzt auch über den 


C 64 ı CPC 464 » VC-20 * Atari 


Neues 


monatlich 
“ Format A4 
5,50 DM 


5000,- DM 
Riesen-Gewinnchance nr aue Software- 


zweimonatlich 
Format A4 
6,50 DM 


zweiımonatlich 
Format A4 
6,- DM 


Spiele-Kassetten: 
Commodore 64 


. u ST 
. C-20, Atari, 
Spitzenprodukte m 
für den wachsenden Markt | nn 464 
der Heimcomputer-Anwender Donk ey Ko ng Je 1000 DM 


Informationen: Tronic-Verlag, Landstraße 29 


Postfach 41, 3444 Wehretal 1, Ruf (0 56 51) 406 93 
Vertrieb: Verlagsunion, Friedrich-Bergius-Straße 20, 6200 Wiesbaden, Ruf (0 6121) 26 60 


